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* Uma crise faz milagres. É certo que mi- 
lagres também fazem crise, porém, no 
momento, a hora é de participar e traba- 
lhar no sentido de fazer com que os mo- 
mentos difíceis pelos quais passamos nos 
deixem resultados positivos. 

No que se refere ao mercado da mi- 

croinformática, isto poderá até acontecer. 
Este mercado, que até agora vinha se de- 
senvolvendo de forma bastante contusa, 
Faço se alterando aos poucos. 
* É sentido por todos que a crise global 
que vivemos reduziu severamente, entre 
outras coisas, as possibilidades de acesso 
da classe média ao consumo dito não bá- 
sico. Um forte golpe no alvo central do 
Marketing dos fabricantes de microcom- 
putadores. 

Era a ela que se dirigiam as chama- 
das. “A solução para seus problemas”. 
O comprador em potencial sentia coceiras 
no bolso. “A Revolução Tecnológica. Te- 
nho que ter um micro. Não posso ficar 
para trás”. E ao efetivar a compra, ele po- 
dia relevar tudo, tamanha sua ansiedade: 
um mau atendimento na loja; um serviço 
de assistência técnica ineficiente; a falta 
de software bom e barato. 

e Afunilou-se o mercado, a competição 
fica mais acirrada. Paralelamente o perfil 
do consumidor é outro. Ele já tem mais 
conhecimento e seus critérios de seleção 
são agora mais rigorosos. Cabe aos fabri- 
cantes e prestadores de serviço da área 
desenvolver novas formas de apresenta- 
ção de seus produtos. 

e Este mês temos uma excelente oportu- 
nidade de constatar como as empresas da 
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área estão se preparando para este novo 
perfil de mercado. 

Realiza-se, do dia 17 ao 24, no Parque 
Anhembi, em São Paulo, o XVI Congresso 
Nacional de Informática, ocasião apropria- 
da para que os interessados discutam 
exaustivamente os novos rumos da micro- 
intormática em nosso pais. Paralelamente 
ao Congresso, temos a realização da Ill 
Feira Internacional de Informática, uma 
ampla mostra dos produtos que vêm sen- 
do desenvolvidos, alguns cercados de 
grande mistério pelas empresas... Vamos 
esperar que estes misteriosos lançamen- 
tos não se limitem a copiar equipamentos 
estrangeiros. Vamos torcer para que eles 
sejam um reflexo da criatividade de um 
povo que não pode (e nem deve) dar-se ao 
luxo de re-inventar a roda, 


A exposição destes produtos é fator 
importante. Para se conseguir uma parce- 
la de tempo das milhares de pessoas que 
visitam os milhares de estandes, é preciso 
haver algum apelo. Este é normalmente 
visual, porque computadores desligados, 
salvo se possuírem marcantes inovações 
de design, tém todos a mesma cara. O 
que está na tela, eis a questão. Questão 
esta que nos aponta um dos problemas 


mais graves de nosso mercado. SOFTWARE. 


e Até então os apelos eram os jogos. 
Coloridos, sonorizados, uma maravilha. 
Num primeiro momento, os jogos eram, 
eles mesmos, produtos-fim. Devidamente 
traduzidos, ou não, muitos deles eram ven- 
didos a preços até um tanto 'salgados, se 
pensarmos em termos de “custo de de- 
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senvolvimento . Hoje a situação é outra: 
muito mais encarados como produtos-meio 
(de compra), eles já são oferecidos por 
algumas lojas gratuitamente, para motivar 
a compra do equipamento. Mas afinal, 
compra-se, hoje, um micro só para jogar? 
E válido comprar um sistema de Cr$ 2 
milhões e ter como demonstrativos apenas 
jogos? Qual a aplicação de um equipa- 
mento deste tipo? E as aplicações 'sérias ? 
São sérias? Como pensar num programa 
de Contabilidade que não dé os sub-totais? 
O mercado já está mudando, e está na 
hora de todos nós levantarmos a questão: 
o que as pessoas realmente querem? De 
que eias precisam? Quem pode responder 
é o visitante da Feira, o comprador, o 
enor. 
* MICRO SISTEMAS, entrando agora em 
seu terceiro ano, pretende cada vez mais 
abrir espaços para que você deixe o mer- 
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“cartas 
PINI 


O sorteado deste mês, que receberá 
uma assinatura de um ano de MICRO 
SISTEMAS, é Francisco Alberto F. da 
Silva, do Rio de Janeiro. 


AVENTURAS NA SELVA 


Encontrei um erro publicado na 
edição nº 23 de MS. O erro é na pági- 
na 50, no programa do Sistema Opera- 
cional para o jogo “Aventuras na Sel- 
va”, da série Adventures. A linha 55 
saiu assim: 55 < IF C LEN U$ THEN 
GOTO 51.Gostaria que revissem o arti- 
go para ver se houve erro na impressão, 
ou entrar em contato com o autor, ca- 
so o erro tenha sido na programação. 
Ricardo S. A. Vasconcelos 
Campinas-SP 


Você tem toda a razão, Ricardo. A 
linha 55 saiu com a impressão errada. 
O correto é: 55 IF C<LEN US$ 
THEN GOTO 51. Aproveitamos para 
lhe avisar que a linha 420 não foi im- 
pressa na listagem publicada. Anote aí: 
420 IF NOTE CODE B$(2) THEN 
GOTO 56. Aproveitamos ainda para 
lhe dizer, e aos outros leitores que ti- 
verem dificuldade neste programa, que 
só existem estes erros no programa, 
mas que ele exige muita atenção na ho- 
ra de digitar. Se você, ou mais leitores, 
tiverem alguma dúvida, é só explicar 
detalhadamente o que ocorreu para 
que o autor possa identificar qual o 
erro de digitação, OK? 


Gostei muito de toda a revista e 
seus programas (...). Testei em meu 
CP-500 os programas da reportagem 
“A Função USR(X) no D-8000”, ob- 
tendo sucesso com as listagens 1 e 2. 
Entretanto a listagem 3 não deu o re- 
sultado esperado, ou seja, rodou nor- 
malmente mas não produziu os sons 
esperados. Aliás, nenhum som, apesar 
da ligação correta ao amplificador. 
Gostaria de saber o porquê. 

Ari Morato 
Ipatinga-MG 


Enviamos suas indagações para o 
autor do artigo, Ivo D'Aquino Neto, e 
este nos respondeu o seguinte: 


O Artigo a “Função USR(X) no 
D-8000” foi escrito basicamente para 
completar o manual fornecido pela 
Dismac, que é extremamente incom- 
pleto, não apresentando todas as fun- 
ções disponíveis no D-8000, dentre 
elas a função USR. 

Esse artigo, entretanto, é válido pa- 
ra equipamentos compatíveis com o 
TRS-80 modelos | e III, ou seja, DGT- 
100, CP-500, Naja etc. Com relação 
aos programas ilustrativos, devo expli- 
car que foram desenvolvidos especifi- 
camente para o D-8000. Isto quer di- 
zer que em outros equipamentos po- 
dem apresentar problemas devido a di- 
ferentes frequências de clock, ou de 
mapas de memória. 

Contudo, pretendo procurar a Mi- 
crodados, representante da Prológica 
em Florianópolis, onde tentarei verifi- 
car o motivo que impede o funciona- 
mento do programa da listagem 3 em 
equipamentos CP-500. Por enquanto é 
só. 

Ivo D'Aquino Neto 
Florianópolis-SC 


NÚMEROS ALE 


Gostaria de sugerir a publicação de 
um artigo que resolva um problema 
que atormenta a mim e a amigos pro- 
prietários da calculadora HP-41C: a 
falta de uma função que gere números 
aleatórios. Como sabemos, existe gran- 
de dificuldade para gerarem-se núme- 
ros aleatórios (ou quase aleatórios, 
com pequena correlação) para a lógica 
eletrônica. Essa função, extremamente 
útil para a programação e pesquisa ran- 
dômica, encontra-se, porém, em diver- 
sas calculadoras Texas. 

Como sugestão, acredito que a me- 
lhor forma de INPUT desse progra- 
ma seria armazenar o primeiro e últi- 
mo números do intervalo do qual se 
deseja o número aleatório a ser usado, 
cada um em um registrador. Armaze- 
nar o número de casas decimais do nú- 
mero aleatório a ser gerado em outro 
registrador. 

Executar a função (cujo programa 
associado estou pedindo). Essa forma 
de INPUT permitiria diminuir pro- 
gressivamente a grade de pesquisa (em 
caso de problemas de otimização não 
linear, por exemplo) de maneira a au- 
mentar a precisão da resposta. 

Décio Decaro 
Barueri-SP 


Vamos esperar, Décio, que alguém, 
lendo sua carta, tenha uma idéia sobre 
como resolver este problema. 


MS AGRADECE 


Num escarapate de venda de jornais 
encontrei a revista MICRO SISTEMAS, 
cuja leitura apreciei, possuidor que sou 
de um “computador de algibeira” 
Sharp PC 1500 e de-.um sistema de mi- 
crocomputador muito divulgado. Te- 
nho grande interesse no assunto, so- 
bretudo a um nível avançado, dada & 
minha formação acadêmica: licenciado 
em Matemática e Engenheiro Geógrafo. 
José Lourenço 
Lisboa-Portugal 


Queiram aceitar meus parabéns pelo 
alto nível dos artigos publicados em 
MICRO SISTEMAS e pela excelente 
oportunidade que esta revista vem pro- 
porcionando aos envolvidos na “infor- 
mática”, ao transmitirem dados tão 
importantes relacionados a novos lan- 
çamentos e programas. 

Edyla M. de Carvalho 
Rio de Janeiro-RJ 


Agradeço a “esta revista pela nota 
dada com relação ao nosso novo ende- 
reço. Gostaríamos, contudo, de retifi- 
car nossos telefones: (011) 257-6118/ 
259-1503, SP. 

José Saad 
Livraria Sistema Ltda. 


Gostaria de deixar caracterizado em 
poucas palavras a atualidade, bom 
gosto e grande índice informativo 
da revista MICRO SISTEMAS, que 
reflete bem a capacidade desta equipe. 
Francisco Alberto F. da Silva 
Rio de Janeiro-RJ 


ELETRÔNICA NA HP41C | 


Bom o programa apresentado pelo 
Engenheiro Pedro Ricardo Drumond 
(MS n9 22). Seria prático que fossem 
feitas as seguintes modificações: 

01 LBL “Eletron” 
020 

03 Enter 

04 STO 01 

05 STO 02 

06 STO 03 

07 STO 04 

Dessa forma não seria necessário 
zerar os registros 01, 02, 03 e 04 via 
teclado, antes de entrar com novos da- 
dos (o que não é explicado com clare- 


* za no artigo). 
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Numa sequência de cálculo XEQ 
Alfa ELETRON Alfa pode ser substi- 
tuído por GTO .001 e R/S; 

O programa alterado usa 29 regis- 
tros dos 63 existentes na HP-41C, não 
necessitando de módulos adicionais. 
Nelson M. da Silva 
Rio de Janeiro-RJ 


Aí está sua contribuição Nelson. 
Por que você não aproveita e manda 
colaborações suas para a gente? 


Quero iniciar parabenizando a revis- 
ta pelo seu contínuo progresso. Houve, 
sem dúvida, uma melhora tanto nos as- 
suntos abordados como na própria 
qualidade da revista em si. Se houve 
progresso isto se deu, entre diversas 
outras coisas, pela contínua contribui- 
ção dos leitores, relevando, sempre que 
possível, pontos positivos e negativos. 

As vezes, porém, alguns se despem 
da razoabilidade e, mesmo que genui- 
namente sinceros, passam a fazer acu- 
sações infundadas. 

Foi o caso de Getúlio Zepelin e 
João Lamorata em sua carta no nº 23. 
Reconheço, por exemplo, que a Micro- 
digital infelizmente desconsiderou uma 
minoria competente por não criar um 
teclado de alta velocidade. Mas por 
que culpar a MS, uma vez que isso fora 
confessado pela própria boca de um 
representante da Microdigital? Achei 
também um erro flagrante qualificar 
equipamentos sofisticados (como a 
HP-41C, por exemplo) como meros 
“calculadores de bolso”. 

Quanto ao volume de publicidade 
na revista, não há porque exigir que a 
MS seja diferente, uma vez que isto é 
comum a “todas” as outras revistas, 
sejam de informática ou não, sejam 
brasileiras ou não (acho, inclusive, 
que isto ajuda a revista a não se tor- 
nar mais cara). 

Esta revista é poderosa por seu teor 
didático (aprendi BASIC por meio de- 
la), e mesmo que programas como 
“Previsão da data de parto provável 
para bovinos” não sejam de proveito 
algum para mim, acredito que a lógica 
em si, ou a forma em que estes progra- 
mas são escritos, ajudam no progresso 
da arte de programar. 

É claro que, como os leitores Ge- 
túlio e João, eu gostaria de que tudo o 
que é publicado na MS fosse plena- 
mente compatível com meu computa- 
dor e que criasse logo em mim um en- 
tusiasmo para pesquisa. Mas acredito 
que vem a ser um comportamento 
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muito mais razoável, ao invés de criti- 
car os programas publicados, contri- 
buir com programas melhores, o que, 
tenho certeza, é o que a revista espera 
de nós, leitores. 

Winston M. Dover 

Rio de Janeiro-RJ 


Gostaria que fosse publicada algu- 
ma coisa sobre as diferenças entre os 
Sistemas Operacionais do tipo NEW- 


DOS, TRSDOS, DOSPLUS ou mesmo. 


alguns macetes. Esses sistemas são uti- 
lizados em TRS-80 ou similares 
(D-8002, CP-500, DGT-100 etc). 
Arthur B. Ferreira 

São Paulo-SP 


Você tem bola de cristal, Arthur? 
Dê uma olhada neste número e depois 
nos conte o que você achou. 


Gostaria apenas de fazer uma suges- 
tão na parte de palavras técnicas usa- 
das em linguagem de computador: se- 
ria possível fazer em um dos exemplá- 
res da revista a tradução de palavras 
que são usadas em Inglês, por exemplo: 
o que faz o display, perform, accept, 
GOTO etc.? 

Queria saber também se vocês têm 
a intenção de colocar na revista cur- 
sos de COBOL, Fortran, como estão 
fazendo agora com o curso de Assem- 
bler. 

Paulo Cesar Guedes 
Marília-SP 


Sendo um feliz possuidor de uma 
HP-41CV, venho elogiar os artigos que 
MS editou até agora sobre o seu uso. 
Gostei muito do “'Curso de Programa- 
ção Sintética” e gostaria de dar uma 
sugestão: já que a HP não publica o 
“Key Notes” no Brasil — o qual já 
tive em mãos e encontrei “dicas” bas- 
tante interessantes —, que tal a ATI 
tentar entrar em acordo com a HP e 
conseguir publicar periodicamente pe- 
quenas (e interessantes) partes do 
"Key Notes” em MS? Seria, creio eu, 
de interesse dos usuários das HPs, de 
MS e também muito da HP que pode- 
ria, quem sabe, até aumentar suas ven- 
das. 

Paulo B. Krouwel 
Itajubá-MG 


Gostaria de pedir que os nossos pe- 
quenos fabricantes (bem como os gran- 
des) publiquem ou forneçam, median- 
te pedido, um Manual de Referência 
de Hardware, a exemplo dos “Hard- 
ware Reference Manual”, dos fabri- 
cantes americanos. No Brasil parece 
que só a Digitus tem tal forma de ma- 
nual, 

A impressão que se tem é de que 
todos têm medo de mostrar de qual fa- 
bricante americano copiam o hardware 
de seus produtos, ou de serem copia- 
dos por outros concorrentes. Há um 
caso que, pelos anúncios, parece até 
engraçado: a Fênix, a Sayfi e a Janper 
copiaram o LNW americano, e não sei 
exatamente quem fez o primeiro, co- 
mo a Unitron com o Apple. 

Enrique H. H. Ferri 
São Paulo-SP 


Sugiro que haja maior número de 
reportagens e artigos ou até mesmo 
programas para aparelhos de maior 
porte. Eu, por exemplo, trabalho com 
um LABO 8221 e até hoje só houve 
um artigo sobre este equipamento pu- 
blicado em MS. 

André Fernandes Esteves 
Santo André-SP 


Gostaria que esta revista abrisse um 
maior espaço para a divulgação de ma- 
térias ligadas ao impacto social da evo- 
lução da informática. Sendo assim, 
gostaria que esta revista editasse uma 
matéria convocando cientistas sociais, 
estudantes, técnicos e demais pessoas 
envolvidas para escreverem artigos con- 
cernentes ao problema, enriquecendo, 
desta forma, a qualidade de prestado- 
ra de serviços que MICRO SISTEMAS 
representa. 

Uma outra sugestão seria uma 
maior divulgação dos problemas e de- 
feitos observados pela maioria dos 
usuários e compradores de micros, que 
não encontram fórum para os recla- 
mos dos desgostos que se defrontam 
com a qualidade de alguns micros e 
respectivos periféricos. 

José Carlos Silva Cavalcanti 
Rio de Janeiro-RJ 


Desejo sugerir a publicação de um 
Curso de Linguagem de Máquina para 
o TK82-C, com exemplo de progra- 
mas e seus respectivos códigos. 

Luís R. Dupont 
Estância Velha-RS 


Envie suas sugestões para MICRO 
SISTEMAS. Elas serão anotadas em 
nossa pauta e procuraremos, na medi- 
da do possível, viabilizá-las. 
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1.7000 Itautec. O pequeno grande microcomputador realizar melhor, entre outras, tarefas de 
Made in Brasil, com nível internacional e Processamento de textos " 
Resultado do mais ambicioso projeto realizado por e Planejamento financeiro 
técnicos e engenheiros brasileiros na área da informática e Entrada de dados 
O microcomputador Itautec 1.7000 é pequenininho mas « Substituição de terminais de vídeo IBM 
faz tudo como gente grande: é compativel com CP/M e Processamento distribuido y 
e tem uma grande capacidade de processamento local Além disso, o 1.7000 Itautec coloca à sua disposição 
e comunicação de dados aliadas a caracteristicas de uma série de serviços exclusivos que só mesmo quem 


modularidade e flexibilidade. O 1.7000 foi projetado para desenvolveu um micro desde o seu início pode oferecer s 





s Um centro de atendimento ao usuario com solução 
mediata para qualquer duvida ou problema 


s Um centro de assistência técnica pronto para atender 
om eficiência em qualquer ponto do território nacional 


s Uma documentação técnica escrita em portugues 
aro. permanentemente atualizada 


s Um centro educacional com cursos completos onde 


ssuário aprende praticando porque. na prática. a 
=onia é outra 


Coloque o microcomputador |.7000 Itautec trabalhando 
ao seu lado. O microcomputador que veio para ficar 


Micro no nome e nas caracteristicas. Macro nas 
qualidades 


Itautec... 











Complemente o seu TK82-C, TK 85, NE-Z8000 ou CP-200 introduzindo uma sub-rotina 
que permita o uso das instruções DATA, READ e RESTORE 





DATA, READ e 
RESTORE no TK 


lgumas vezes encontramos pro- 
gramas interessantíssimos, em 
BASIC, mas que não são com- 
patíveis com o BASIC dos nossos mi- 
cros. Na maior parte das vezes o proble- 
ma se resume a algumas instruções que 
não têm exatamente a mesma sintaxe ou 
que funcionam de um modo particular 
em cada equipamento. 

Há porém o caso das instruções 
READ, DATA e RESTORE que se situa 
num nível diferente, pois os TKs, CPs e 
NEs não possuem estas instruções. En- 
tão, estaríamos fadados a não rodar pro- 
gramas que incorporassem tais instru- 
ções? A resposta é não. 

Toda instrução, seja ela qual for, na 
realidade não passa de uma sub-rotina 
do sistema operacional do micro e se o 
equipamento não tem uma determinada 
instrução é porque não há uma sub-roti- 
na, no sistema operacional, que cumpra 
essa tarefa. Podemos, então, escrever a 
tal sub-rotina para “complementar” o 
micro e assim dispormos das instruções 
que quisermos. 

De fato, existe uma outra vantagem 
nisso: a instrução que estivermos imple- 
mentando não precisa ser exatamente 
igual à de outros equipamentos, mas sim 
do modo que acharmos mais convenien- 
te aos nossos propósitos. 


APRENDENDO AS INSTRUÇÕES 





A instrução DATA tem o seguinte 
formato: S DATA 5, 12, 1983, PRIMEI- 
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Ronaldo de Almeida Santos 


RO, MARÇO ,83. Nos TKs, CPs e NEs, a 
única instrução que permite esse forma- 
to sem apresentar erro de sintaxe é a 
linha REM. Podemos utilizá-la como 
DATA, em qualquer lugar do programa, 
mas quanto mais próxima do início mais 
rápida será sua execução. 

Para diferenciar uma linha REM/DA- 
TA de uma linha REM comum devemos 
utilizar, na linha de comentário, um es- 
paço entre a instrução e o texto; desse 
modo, REM (espaço) TEXTO não será 
interpretado como DATA. 

A instrução READ lê sequencialmen- 
te os dados da instrução DATA. No nos- 
so caso específico, READ = GOSUB 
9000, o qual retornará com o dado lido 
na variável R$. Se o dado desejado for 
um número, então, basta utilizar a fun- 
ção VAL R$ para obter o valor do dado. 

Isso é muito importante pois, dessa 
forma, a nossa instrução DATA e 
conter qualquer valor ou expressão, po: 
exemplo: -5,99,999 (5+A)*3, INTOUY/ 
37), etc. 

Ê importante lembrar + a sub-roti- 
na utiliza duas variáveis, R$ e C,e o 
programa principal não deve utilizá las, 
pois seus valores serão alterados. 

A instrução RESTORE permite que a 
sequência de leitura seja A puras e pa- 
ra isso basta fazer LET C = 16508. É 
importante lembrar que deve haver sem- 
pre um RESTORE antes da primeira ins- 
trução READ. 

Assimiladas estas instruções vamos 
digitar a sub-rotina da listagem a seguir, 


testando-a, através de RUN, E 
te modificações nas linhas (DA. 
TA). Modifique a linha 20 para PRINT 
R$, VAL R$ e vá eliminando os da- 
rs que apresentarem erros da função 


Ronaldo de Almeida Santos é formado em 
Engenharia Mecânica pela FEI. Atualmente 
trabalha na área de pesquisa e desenvolvimen- 
to de terminais elétricos, sendo proprietário 
de um TK82-C há um ano. 


Rotina READ/DATA 


REM DATA/READ/RESTORE 
LET C=16508 
REM 5,12,1983, PRIMEIRO, MARC 


want 


0,83 


n 
s 


GOSUB 9908 
28 PRINT R$ 
30 IF R$="FIM" THEN STOP 
48 GOTO 10 
88 REM MICRO SISTEMAS,=8, INT ( 
RND*9)+1,ALO ALO ALO, FIM 
9000 IF PEEK C=118 OR C=16508 TH 
EN GOSUB 9060 
9B10 LET R$="" 
9820 LET C=C+1 
9030 IF PEEK C=26 OR PEEK C=118 
THEN RETURN 
9048 LET R$=R$+CHR$ PEEK C 
9050 GOTO 9828 
9060 LET C=C+5 
9070 IF PEEK C=234 AND PEEK (Cel 
) THEN RETURN 
9088 LET C=C+PEEK (C-2)+256*PEEK 
(C-1)+4 
9898 GOTO 9078 = 
| E 
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À mais completa exposição 
de microcomputadores do país 


A solução de compra do seu micro está 


no CEI - Centro Experimental de 
Informática da Servimec, a mais 


completa exposição de micros das mais 


famosas marcas do país 
Aqui você tem acesso aos vários 


E para suas consultas e descobertas, o 
CEI oferece uma livraria especializada 
que inclui as mais importantes revistas 
nacionais e estrangeiras. Além de levar 
o micro e os softwares únicos ao seu 
caso, no CEI você ainda tem mais 


financiamento, leasing ou aluguel. 
No CEI você tem serviços e 
atendimento completos. 


Venha ao CEI e descubra um 
admirável mundo novo. 


microcomputadores e pode eleger o 
que melhor lhe convém, através de 
testes sob a orientação de experientes 
profissionais que curtem o assunto 
tanto quanto você. 


estas vantagens: preços e 


condições especiais de Estacionamento próprio. 


ental de Informática 


ervimec 


Rua Correa dos Santos, 34 - Tel.: 222-1511 
Telex: (011) 31.416 - SEPD - BR - São Paulo - SP 


Centro Experi 
da 








Os sistemas operacionais foram indispensáveis para o desenvolvimento 
dos computadores modernos. Veja como eles surgiram e como funcionam 





Uma introdução 
aos sistemas operacionais 


Milton de Albuquerque Bezerra 


Luiz Antonio Belleti Rodrigues 


“ 


uem procurar familiarizar-se com o uso de computado- 

* res, ouvirá com frequência termos técnicos que não in- 

C,.) tegram o vocabulário cotidiano da maioria das pessoas. 

Um desses termos é o Sistema ional, muitas vezes tam- 
bém citado como Supervisor, Monitor ou Sistema E; ivo. 

Neste a nha em om explicar o que vem a ser um Sis- 

tema Operaci e por que ele tornou-se importante na disse- 

minação do uso de computadores. Além disso, iremos mostrar 

as características básicas de alguns sistemas operacionais para 

mucrocomputadores. ; 


SISTEMA OPERACIONAL: O QUE É? 


Ao usarmos um computador, seja nosso micro pessoal ou o 
computador de nossa empresa ou banco, sabemos que nos co- 
municamos com ele por meio de programas (software). Mas 
quando tentamos identificar, dentro do sistema global que nos 
é apresentado, a parte que corresponde ao software e a que 
corresponde ao hardware (a máquina propriamente dita), de- 
frontamo-nos com algumas dificuldades. 

Esté sistema global que é apresentado ao usuário pode ser 
chamado de máquina virtual. Isto é, corresponde ao hardware 
associado a um software (que no caso é o Sistema Operacio- 
nal), de modo que o computador disponha de atrativos adicio- 
nais e seja mais facilmente manipulado pelo usuário do que os 
circuitos eletrônicos que o compõem. Na verdade, para a maioria 
dos usuários, o Sistema Operacional está totalmente integrado 
ao hardware. 

De forma objetiva, podemos definir Sistema Operacional 
como uma coleção de programas, normalmente fornecida pelo 
fabricante do computador, que tem por objetivo tornar o uso 
da máquina mais seguro, fácil e eficiente. 

A figura 1 ilustra a herarquia obedecida pelos diversos tipos 
de software, bem como o conceito de máquina virtual, que vai 
se estendendo em camadas até que o sistema alcance o nível 
de detalhamento desejado. 

Até este ponto, preocupamo-nos em explicar o que vem a 
ser um Sistema Operacional. É muito importante, entretanto, 
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MÁQUINA VIRTUAL APRESENTADA AO USUÁRIO 





Figura 1! — Conceito hierárquico de máquina virtual 


entender por que os sistemas operacionais são indispensáveis. 
Para tanto, vamos nos reportar às origens da computação. 


UMA ABORDAGEM HISTÓRICA 


Os primeiros computadores eram máquinas eletrônicas que 
a cada tarefa executada exigiam intensa interação do homem 
com a máquina. Cada programador era um expert, obngado a 
conhecer todos os detalhes da máquina, ao mesmo tempo em 
que todo o trabalho estava centrado no computador, colocan- 
do em segundo plano a aplicação e o resultado final esperado. 

Com o tempo, cada programador passou a definir conjuntos 
de convenções, procurando criar rotinas padronizadas para a 
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execução das operações mais comuns, de modo a poupar tem- 
po e minimizar os erros de manipulação do computador. A par- 
tir desse comportamento dos programadores, começaram a 
surgir bibhotecas de procedimentos que procuravam uniformi- 
zar as várias convenções existentes e permitiam reduzir o tem- 
po que o especialista perdia na operação do computador, dele- 
gando estas tarefas a um operador menos qualificado. 

O operador, seguindo os padrões definidos, intervinha em 
cada fase do processamento, supervisionava toda a entrada/saí- 
da de programas e dados e mantinha registro de quem usava o 
computador e para quê. Como a velocidade da máquina era 
baixa, a eficiência com que as tarefas de operação eram real- 
zadas tinha menor importância. 

Este quadro modificou-se com o aparecimento de compu- 
tadores mais rápidos e poderosos — os computadores da déca- 
da de 60, que chegavam a ter uma velocidade 100 vezes supe- 
mor à de seus antecessores. Este grande aumento de velocida- 
de, entre outras novidades, tornou insuportável o uso de pro- 
cedimentos operacionais ineficientes. Em outras palavras, se 
anteriormente o operador necessitava de cerca de cinco minu- 
tos para iniciar uma tarefa que durava duas horas, tínhamos 
somente 4% do tempo útil do computador desperdiçado. Mas 
se fossem necessários cinco minutos para iniciar um programa 
de cálculo aritmético a ser executado em 30 segundos, pratica- 
mente teríamos gasto todo o tempo em tarefas de inicialização. 

Portanto, tornou-se imperativa a introdução de controles 
que permitissem a automação do processo de inicialização dos 
programas e, como consequência, fornecessem maior disponi- 
bilidade de tempo para as tarefas de processamerito. 

Como a máquina passou a ser controlada pelo operador e 
por ela própria (programa do usuário em execução), novas di- 
ficuldades surgiram. O programador podia escrever programas 
que utilizassem mal a máquina — por exemplo, o programa 
podia alterar a ordem de chamada das próximas tarefas ou 
acessar um arquivo de outto usuário. Dificuldades desta natu- 
reza exigiram que determinados comandos da máquina não es- 
tivessem diretamente na mão dos programadores, mas subordi- 
nados a um controle impessoal que seria exercido por um con- 
junto de programas, que foi denominado de Sistema Opera- 
cional. 

Com a introdução de novas facilidades no hardware dos 
computadores, entre elas o conceito de interrupção, foi pos- 
sível projetar sistemas operacionais de dois níveis: nível Super- 
visor e nível Usuário. Com a definição destes dois níveis, for 
possível restingir ao nível Supervisor a execução de controles 
de máquina que pudessem interferir nas tarefas de outros usuá- 
nos. Por exemplo, se um computador admite vários usuários 
simultaneamente, quando um deles está escrevendo em uma 
unidade de fita magnética nenhum outro poderá fazélo en- 
quanto o primeiro não a liberar. Fica claro que os recursos do 
sistema que podem ser compartilhados devem ter um alocação 
centralizada. Este controle é feito pelo Sistema Operacional e 
se o programa do usuário necessitar de uma operação de acesso 
ao recurso, precisa fazer uma chamada ao Sistema Operacional 
“o para o nível Supervisor, executa a operação sol- 
citada. 

Além das diferenças já citadas, foi importante o início da 
utilização de canais autônomos de entrada/saída, os quais, fun- 
cionando em paralelo com o processador, permitiram liberar a 
UCP do controle de transferência de dados entre os penféricos 
e a memónia principal. Os Sistemas Operacionais passaram a 
admitir multiprogramação, ou seja, enquanto um programa 
aguardava a conclusão de uma operação de entrada/saída, ou- 
tro programa, residente na memória principal, poderia usar o 
processador até que o primeiro estivesse pronto para recomeçar. 

O aprimoramento do hardware e o refinamento dos concei- 
tos introduzidos permitiram aos Sistemas Operacionais terem 
uma função vital no computador, passando a supervisionar O 
comportamento dos programas da instalação. Em função de 
parâmetros previamente estabelecidos, o Sistema Operacional 
carrega, interrompe ou limita as ações dos programas, contro- 
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la o armazenamento de dados e dirige o uso dos periféricos, 
entre outras funções. 

Os Sistemas Operacionais dos computadores atuais, bem 
como os dos microcomputadores, têm usado os conceitos defi- 
nidos procurando, (obviamente dentro das limitações do had- 
ware de cada sistema), reduzir ao mínimo a intervenção do 
usuário em atividades intrínsecas ao funcionamento da máqui- 
na, de tal forma que o usuário se preocupe quase exclusiva- 
mente com o seu problema específico. 


UMA CLASSIFICAÇÃO DOS SISTEMAS OPERACIONAIS 


Uma forma de caracterizar os sistemas operacionais é pelo 
principal tipo de serviço que prestam ao usuário. A seguir, 
apresentamos uma possível classificação que enquadra a maio- 
na dos sistemas. 


SISTEMA TIPO LOTE (BATCH) 


Os sistemas operacionais do tipo lote funcionam de acordo 
com o próprio nome, isto é, um lote de tarefas é organizado na 
entrada e as tarefas são processadas sequencialmente, uma após 
a outra. 

Em sistemas deste tipo o tempo de resposta (tempo decorri- 
do entre a entrega da tarefa ao sistema e saída do resultado) 
pode ser alto, devido ao agrupamento das tarefas, fazendo com 
que programas curtos submetidos após um programa longo te- 
nham que esperar a execução por ordem de chegada, degra- 
dando o tempo de resposta. Por outro lado, os sistemas tipo 
lote, quando bem projetados, podem ter um throughput (razão 
de execução de tarefas por unidade de tempo) muito alto, por- 
que o processador é melhor utilizado e os sistemas operacio- 
nais podem ser bem simplificados. 
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UMA INTRODUÇÃO AOS SISTEMAS OPERACIONAIS 





SISTEMAS COMPARTILHA DOS (TIME-SHARING) 


Nos sistemas compartilhados o usuário tem acesso ao com- 
putador através de um terminal de vídeo ou telempressor, en- 
quanto a capacidade de processamento do sistema é dividida 
por todos os usuários conectados ao computador em um deter- 
minado instante. Cada comando do usuário é interpretado e 
executado em seguida. Em caso de erro, este é imediatamente 
comunicado através do terminal. 

Nestes sistemas o usuário normalmente prepara os seus pro- 
gramas no próprio terminal, por meio de um Editor de Textos, 
compila-os, executa-os e comanda a impressão dos resultados 


quando achar conveniente. Em caso de erro, ele providencia as: 


alterações, utilizando o Editor de Textos, e repete o procedi- 
mento. 

Os sistemas compartilhados devem dar resposta em alguns 
segundos para a maioria dos comandos de tal modo que cada 
o tenha a impressão que o sistema está dedicado à sua 
tarefa 

Os problemas provocados pelo compartilhamento da me- 
mónia principal e dos periféricos e pela segurança dos arquivos 
armazenados em memória secundária, tornam os sistemas ope- 
racionais compartilhados muito mais complexos e com um 
throughput muito menor do que os sistemas tipo lote de mes- 
mo porte. Mas, conside;ando outras fatores, tais como o tem- 
po humano para desenvolver e depurar umsprojeto complexo, 
a produtividade de cada tarefa torna-se muto maior. 


SISTEMAS DE TEMPO REAL (REAL TIME) | 


Em sistemas de tempo real os comandos devem ser execu- 
tados num intervalo de tempo realístico em termos humanos, 
isto é, o sistema deve responder num intervalo de tempo prefi- 
xado, após o qual haverá perda de informações ou operação 
incorreta. 

Estes sistemas são semelhantes aos sistemas compartilhados, 
mas seus objetivos são muito diferentes. Eles são destinados a 
aplicações de medição/controle que exijam monitoramento 
contínuo de instrumentos e tempos de respostas rígidos. Além 
«disso, em tempo real um ou mais usuários estão operando um 
único programa ou um pequeno conjunto de programas, en- 
quanto em sistemas compartilhados cada usuário está execu- 
tando uma aplicação diferente. Os sistemas de tempo real são 
normalmente operados por um funcionário ou cliente de deter- 
minado serviço, enquanto em sistemas compartilhados o usuá- 
no é normalmente um programador. 

Alguns sistemas de tempo real são construídos para aplica- 
ções específicas, tais como reservas de passagens aéreas, con- 
trole de tráfego, controle de refinarias, bolsas de valores etc. 


O SISTEMA OPERACIONAL COMO ADMINISTRADOR 
DE RECURSOS 


Uma outra abordagem que é utilizada para o entendimento 
dos sistemas operacionais é encará-los na função de admuinis- 
tradores, responsáveis principalmente pela atualização perma- 
nente do estado de cada recurso, definição da política de alo- 
cação de recursos (quem recebe, quanto e o quê) e a hberação 
dos mesmos. 

Quando adotamos este enfoque, podemos, de forma concei- 
tual, dividir o sistema operacional em quatro gerências, (figura 
2), que são as seguintes: 


Gerência de Memória 


Tem como função primordial manter atualizado o estado de 
memória, isto é, controlar as partes de memórias que estão sen- 
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Figura 2 — O sistema operacional como um administrador de recursos 


do utilizadas, identificar quem as está usando e supervisionar 
as àreas disponíveis. Além disso, determuna a alocação de mais 
memória (quando e quanto), garante a integridade das áreas de 
programa, impedindo que outro processo acesse posições de 
memórias reservadas para um determinado programa, e libera 
com facilidade as áreas de memórias quando um processo não 
mais delas precisa. 


Gerência de Processador 


A Gerência de Processador, através dos seus vários módulos, - 
é responsável pelo controle de todos os processos em andamen- 
to num computador. 

A figura 3 mostra um esquema de vários estágios por que 
passa um processo. Inicialmente, o processo é selecionado e fi- 
ca no estado PRONTO. Neste estado, ele está apto a receber o 
processador, isto é, aguarda que o sistema operacional o colo- 
que em execução. Quando o processo está sendo executado, 
ele pode terminar ou ser interrompido para que o processador 
atenda um processo de maior prioridade ou para que seja reali- 
zada uma operação de entrada/saída. O processo permanecerá 
no estado BLOQUEADO até que a condição de bloqueio seja 
satisfeita, quando passará ao estado PRONTO, aguardando no- 
va disponibilidade do processador. 


Gerência de Periféricos 


A Gerência de Periféricos mantém o controle dos penfén- 
cos, canais e unidades de controle, decidindo sobre sua aloca- 





Figura 3 — Diagrama de estados utilizado pelo gerente de processador 
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jo e imciando operações de entrada/saída, bem como garan- 
fundo a segurança, isto é, impedindo a utilização indevida de 
recurso previamente alocado. 


rência de Informações 


A Gerência de Informações é responsável pelo controle do 
“uso de arquivos, ou seja, abre e fecha arquivos e decide se o 
ocesso pode ou não acessar as informações. 


SISTEMAS OPERACIONAIS PARA MICROS 


Os microcomputadores mudaram totalmente o desenvolvi- 
nto dos sistemas operacionais, que evoluíram (em complexi- 
le) acompanhando o aumento da capacidade de processa- 
nto dos computadores. No caso específico dos micros, de 
a semelhante, primeiro construíram-se monitores simples, 
ecendo posteriormente sistemas operacionais mais podero- 
à medida que o hardware se desenvolvia. 
Os microcomputadores são geralmente orientados para um 
único usuário, processando um programa de cada vez. Seus sis- 
temas operacionais são bastante simples e fáceis de construir. 
É necessária, porém, a compatibilização com programas já exis- 
tentes, sendo mais comum a utilização de sistemas operacio- 
mais largamente usados. 

Existe uma grande vanedade de monitores e microcompu- 
dores, com diferentes configurações de hardware. É difícil 
“construir um sistema operacional que seja adaptável em qual- 
quer máquina, principalmente devido à existência de diversas 
UCPs. Porém, a construção modular do monitor permite uma 
relativa compatibilização em UCPs semelhantes. 

Com o objetivo de ilustrar os vários níveis (em complexida- 
de) de sistemas operacionais para microcomputadores que po- 
dem ser instalados em uma mesma configuração de hardware, 
veremos a seguir exemplos de sistemas operacionais de uso ge- 
ral para microcomputadores com UCP Zilog Z80, Intel 8085 
ou Rockwell 6502, e um conjunto de periféricos bem variado. 

O primeiro deles é o CP/M, sistema bastante difundido e de 
aplicações bem diversas. Depois passaremos ao MP/M, sistema 
mais recente e mais complexo, e por fim veremos o CP/NET, 
que utiliza parte dos dois sistemas anteriores numa rede, ten- 
dência atual dos sistemas operacionais. 









CPIM 


O CP/M (Control Program for Microcomputers) é um siste- 
ma operacional para microcomputadores adaptável a diversas 
configurações de hardware. O CP/M é monoprogramável, ou 
seja, orientado para um único usuário (um só console) e é en- 
contrado em um número muto grande de micros, com as mais 
diversas configurações e utilizações. 

Existe um grande número de programas já desenvolvidos 
para o CP/M, disponíveis no mercado. Seu grande sucesso no 
mundo inteiro deve-se à facilidade de implantação e utilização, 
à sua organização modular e à flexibilidade em diversas confi- 
gurações, sem muita especificidade de utilização. 

Basicamente, a única limitação de um microcomputador 
quanto à implantação do CP/M é a memória. É preciso que ele 
tenha um mínimo de 20 Kbytes de memória RAM contínua, 
iniciando do endereço zero. Teoricamente, o CP/M suporta 
qualquer tipo de disco, impressora e terminal. Porém, expe- 
riências mostraram que discos com capacidades acima de 8 Mb 
não podem ser usados. 


MP/M 


O MP/M é um sistema operacional bem similar ao CP/M, po- 
rém mais complexo. Ele é multiprogramável, suportando até 
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«carregado por um programa especial ou então através do 
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Figura 4 — Configuração básica de um sistema CP/NET 


16 consoles, e roda todos os programas feitos para o CP/M, 
mantendo compatibilidade inclusive com os comandos intrín- 
secos do sistema operacional. 

Ao contrário do CP/M, o MP/M não reside em um local 
fixo do disquete. Ele é um arquivo no diretório do So dB 

No MP/M os programas não são executados em lugar fixo 
na memória, podendo ser colocados em diferentes partições e 
executados simultaneamente com outros programas em outras 
posições. Cada console é um usuário e possui um diretório em 
particular, podendo acessar arquivos do sistema ou de outro 
usuário. Também é possível proteger os arquivos através de se- 
nhas. 


CP/NET 


O CP/NET é um sistema operacional modular de controle 
de rede, residente parte em um micro principal com MP/M e 
periféricos rápidos de grande porte, e parte em micros menores 
funcionando com CP/M. 

O CP/NET visa justamente possibilitar o uso de poucos peri- 
féricos de grande porte (discos rígidos, impressoras rápidas 
etc.) por vários micros, de forma a om so o potencial de pro- 
cessamento dos micros com estes periféricos sem onerar O pre- 
ço de cada configuração. (Ao contrário dos micros, os perifé- 
ncos de grande porte são extremamente caros, tornando muito 
custosa sua utilização para apenas um microcomputador.) 

O CP/NET não modifica o CP/M ou o MP/M. No requisitan- 
te (CP/M), o CP/NET controla as operações de E/S e, quando 
destinadas a periféricos remotos, manda mensagens pela rede. 
No servo (MP/M) o CP/NET é um conjunto de processos em 
execução. Estes processos recebem e controlam todas as men- 
sagens dos requisitantes, executando as operações necessárias. 
A figura 4 ilustra a configuração de um sistema CP/NET. 

O CP/NET suporta um grande número de diferentes topo- 
logias de redes e variedades de equipamentos periféricos, sendo 
possível ainda a configuração com mais de um sistema princi- 
pal (o servo) e também requisitantes sem discos ou impresso- 


ras, só com console e memória, executando todas as operações 
de disco pela rede. E 
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Uma pequena introdução e comparação entre o TRSDOS, o NEWDOS e o CP/M 





DOS vs. OS: uma 
breve comparação 


eficiência do uso de um sistema 
de computação necessita de um 
rigoroso controle sobre suas 
atividades: carregamento de programas; 
entrada e saída de dados; o acionamento, 
no devido tempo, de um determinado 
periférico; cálculos etc. 

Se tudo isso fosse feito por um ser 
humano, a tarefa seria quase impossível, 
pois exigiria muito do operador, que 
não teria condições de executar um tão 
grande número de operações e muito 
menos a capacidade de cumpri-las com 
a rapidez necessária. 

Por isso, foi criado o Sistema Opera- 
cional, que faz com que o próprio com- 
putador use a sua capacidade para exe- 
cutar tarefas de rotinas extremamente 
complexas, porém perfeitamente defini- 
das. Em tempo, o Sistema Operacional é 
um programa ou uma série de rotinas 
agrupadas em módulos, desenvolvidas 
para controlar todos os recursos dispo- 
níveis em um sistema de computação. 

De um modo simples, pode-se clas- 
sificar um Sistema Operacional em dois 
tipos: o Sistema Operacional em Disco 
(em inglês, DOS) ou o Sistema Opera- 
cional Simples (OS em inglês). No DOS, 
as rotinas do sistema ficam armazena- 
das no disco e somente são carregadas 
para a memória quando acionadas, ou 
seja, quando solicitadas, num procedi- 
mento que recebe o nome de over-lay. 
Quanto ao OS, todo o sistema é carrega- 
do para a memória do computador 
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quando de seu acionamento e todas as 
rotinas passam a ficar residentes na me- 
mória até que ele seja desativado. (Uti- 
lizaremos neste artigo as siglas DOS e 
os porque, apesar de estarem em inglês, 
são as efetivamente utilizadas no Brasil.) 

Em microcomputadores que utilizam 
o DOS, existe uma memória chamada 
ROM (PROM, EPROM etc) que é onde 
fica armazenada a linguagem (o Inter- 
pretador, normalmente BASIC, com o 
qual o micro trabalha) e o Sistema Mo- 
nitor, que tem como função controlar a 
utilização do micro e carregar a parte 
principal do DOS. O Sistema ocupa, 
quando carregado, uma porção de me- 
mória RAM e complementa o BASIC re- 
sidente. 

Em micros que usam o OS, existe ape- 
nas uma pequena memória EPROM que 
contém a rotina de carga do sistema em 
questão. O restante da memória do mi- 
cro é a RAM, que passa a conter o siste- 
ma operacional e a linguagem que o mi- 
cro está operando: BASIC, COBOL, 
FORTRAN, Pascal etc. 

Uma diferença deve ser observada: o 
DOS é um sistema mais poderoso que o 
OS, pois possui uma área maior para sua 
alocação, que é o disco. Em compensa- 
ção, ele é mais lento, pois tem que car- 
regar uma determinada rotina do disco 

uando esta for solicitada. Quanto ao 
S, é um sistema não tão poderoso 
quanto o DOS, mas é bem mais rápido, 
pois o acesso à memória (onde estão alo- 


cadas suas rotinas) é bem mais rápido 
que o acesso ao disco. 

Os sistemas DOS mais comuns em 
micros são o TRSDOS, NEWDOS, 
LDOS e o DOS PLUS, estes dois últimos 
criados recentemente. Com relação a um 
sistema OS, o mais conhecido é o CP/M, 
Control Program for Microcomputers, 
desenvolvido pela Digital Research. 

Os quatro primeiros sistemas citados 
foram desenvolvidos para a linha do mi- 
cro americano TRS-80, Modelos I e III, 
que já possui vários similares nacionais 
compatíveis, como CP-500, DGT-100, 
D-8000/1, JR Sysdata, Naja, JP-01 e 
TRS-80 IV. Nestes também os DOSs 
mais conhecidos e usados são o 
TRSDOS e o NEWDOS, dos quais trata- 
remos agora. 


TRSDOS 


O TRSDOS possui rotinas para aces- 
so a disco, gravação e leitura de arquivos 
e programas, rotinas para proteção de 
arquivos e vários outros comandos, tais 
como: 

CMD S — Retorna do BASIC para o sis- 
tema operacional. 

CMD O — Classifica em ordem alfabé- 
tica uma matriz string. Por exemplo, 
CMD 0,X,YS(Z), onde X é a variável 
que contém o número de elementos a 
serem classificados e Y $(Z) é o nome da 
matriz e o número do elemento matriz 
onde será iniciada a classificação. 
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CMD R — Aciona a marcação do tempo 
pelo relógio “aceso” no canto superior 
direito do vídeo. 


CMD T — Desativa o relógio. 
CMD Z — Aciona a função que copia na 


impressora tudo que for mandado para 
o vídeo. 


CMD C — Compressão de programas. 
Elimina comentários e espaços em bran- 
co que não estejam entre aspas. 


NEWDOS 


O NEWDOS é um TRSDOS expandi- 
do, com mais comandos e facilidades. 
Por exemplo, se as teclas JKL forem 
pressionadas ao mesmo tempo, o que es- 
tiver no vídeo é automaticamente co- 
piado na impressora. Além disso ele pos- 
sui facilidades para backup (cópias) de 
discos, através do comando COPY, que 
permite copiar integralmente um disco 
ou apenas algum programa armazenado 
em um determinado disco, para o mes- 
mo disco ou para outro drive. 

O NEWDOS possui dinda um potente 
comando que permite ao usuário do 
equipamento mudar a especificação de 
cada drive: o comando PDRIVE. Com 
ele, pode-se alterar» um disquete do 
NEWDOS de modo que possa ler um 
disquete gerado no TRSDOS. 


Exid) 


nd 


x 5 
PRINT 


omercialização. 
einamento. 
rogramas 
specíficos. 


| Pacaembú, 1261 
jenópolis 
- São Paulo - SP 


Apoio Total. 


Alguns utilitários do NEWDOS são, 
por outro lado, “utilíssimos” para ope- 
ração em disco. São eles o LMOFFSET, 
que permite a cópia com facilidade de 
programas em linguagem de máquina, o 
ASPOOL, que descarrega na impressora 
um arquivo do disco, liberando desta 
forma a máquina para outra utilização, 
um Editor Assembler para a introdução 
de rotinas e programas em Assembler, o 
Superzap, que é um verdadeiro raio-x do 
disco, permitindo-se acessar qualquer 

rte do disco e mudar seu conteúdo e o 
DIRCHECK, que analisa o estado de um 
disco e indica o que está errado (ele não 
conserta, apenas dá o diagnóstico). 


CP/M 


Alguns micros nacionais de uso mis- 
to pessoal/doméstico já rodam o sistema 
operacional CP/M, como DGT-101, o 
S-700, o Schumec, o AP II, Dismac 
séries Alfa 2064 e 3000 etc. 

Como dito anteriormente, o CP/M 
não é um sistema operacional tão pode- 
roso quanto o NEWDOS, mas é bem 
mais rápido. Além disso, ao contrário 
dos outros sistemas, que trabalham com 
apenas 32 Kb de memória, o CP/M re- 
quer 64 Kb para poder operar. 

Vários programas comerciais já foram 
feitos usando o CP/M e programas mais 


comuns, como Folha de Pagamento, 
Controle de Estoque e Contabilidade já 
são normalmente feitos com o CP/M. 
Ao ser ligado um equipamento que 
utiliza o CP/M, uma rotina residente em 
uma ROM carrega o Cold Start Loader, 
que tem como função carregar todo o 
sistema operacional. Quando o sistema 
já foi carregado e possui um programa 
em execução, se for necessário um 
RESET no sistema a rotina responsável 
pelo carregamento do sistema é a Warm 
Start. O próprio nome indica o que cada 
uma faz: o Cold Start Loader (partida a 
frio) é quem faz o carregamento inicial 
do sistema; quando se fizer necessária 
uma nova carga (RESET), aí a respon- 
sabilidade passa para o Warm Start (par- 
tida a quente), que efetua o carregamen- 
to depois de o sistema já estar funcio- 
nando, após ele já estar quente. E 
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api unitron 


O melhor micro 
profissional ; 
fabricado no Brasil. 


A maior quantidade 


de prog 


ramas 


disponíveis no mundo. 


Assistência 





BIBLIOTECA DE INFORMATICA 


Orientação técnica sobre Biblio- 
grafia de Informática para estudan- 
tes, profissionais e Executivos 


Fornecimento de Livros e Tratados espe-Na 

cificos ou Coleções com Brindes Tecnicos Wã 
vo 

Filmes e Slides fonados para educar 

principiantes. executivos e profissionais 

de programação e operação 


BOLSA DE SOFTWARE 


Contabilidade — Controle de Estoque — Con- 
tas a Receber — Contas a Pagar — Folha de 
Pagamento — Faturamento 

Pacotes para CP 500 — DGT 100 — Dismac — 
TK e Naja 

Atendimento Personalizado para programas es- 
pecificos 


BUREAU DE SERVIÇOS 


* Contabilidade e Folha de Pagamento por Com- 
putador 

* Serviços desde o PLANILHAMENTO aos Relato- 
rios Finais 


QUALIDADE E RESPONSABILIDADE 


A PREÇOS REDUZIDOS 
éb 


IR de Goes COMÉRCIO E ASSESSORIA 


Reembolso Postal 
Formulários contínuos 


R. Conde de Bonfim, 344406 Bloco [ 
Tijuca - Rio de Faneiro - RJ 

CEP 20520 - Tel.: (021) 234-3945 
Caixa Postal 24117 — CEP 20522 


E) ssessaria conméma 


NÃO SE ILUDA! ... 


Na hora de comprar seu 
Minicomputador, Progra- 
mas, Impressoras, etc. 

Consulte quem joga 
aberto. Revenda autoriza- 
da da DIGITUS — MICRO- 
DIGITAL — DISMAC — 
POLYMAX. 

Também Manutenção au- 
torizada DIGITUS. 
Comprove nosso atendi- 
mento! 

Preço justo por serviço 
correto. 


TESBI ENG. TELEC. LTDA. 
RUA GUILHERMINA, 638 - ENCANTADO 
TEL.: (021) 591-3297 e 249-3166 











QUIrSsos 


e A MICROS Processamento de Dados pro- 
move regularmente cursos de programação 
BASIC e COBOL. Para o curso de BASIC são 
utilizados dois microcomputadores Dismac e 
um NE-Z8000, com horário individual para 
treinamento. As turmas são compostas de, 
no máximo, 20 alunos e todo o material di- 
dático é fornecido pela Micro's. Maiores in- 
formações na Rua Duque de Caxias, 450, 
Edifício Chams, sis. 702 e 703, tel.: (034) 
253-6965, Uberlândia, MG. 

e O Centro de Informática/Ciência da Com- 
putação da UE RJ está promovendo os seguin- 
tes cursos: Técnicas Avançadas de Programa- 
ção de Mini/microcomputadores em Lingua- 
gem BASIC, de 03/10 a 04/11, segundas, 
quartas e sextas-feiras, das 19:00 às 22:00h; 
Mini/microcomputadores Eletrônicos — Apli- 
cações e Uso, de 08/11 a 07/12, terças, quar- 
tas e quintas-feiras, das 19:00 às 22:00h. O 
endereço da UERJ é Rua São Francisco Xa- 
vier, 524, Pavilhão Haroldo Lisboa da Cunha, 
29 andar, tel.: (021) 284-8322, ramais 2417 e 
2507, Rio de Janeiro, RJ. 

e A Compushop está realizando, de 17 a 27 
de outubro, o curso de BASIC Completo. O 
curso terá a duração de 24h, de segunda a 
quinta-feira, das 18:00 às 21:00h. A Compu- 
shop também está promovendo o curso de 
VisiCalc, nos diase9 e 10 de novembro, das 
08:30 às 17:30h, às quartas e quintas-feiras. 
Esses cursos são limitados a 10 alunos. Maio- 
res informações pelo tel.: (011) 210-0187, R. 
Dr. Mário Ferraz, 37, São Paulo, SP. 

e Dando continuidade à sua programação, 
a EConsult oferece os cursos de Programação 
BASIC Nível |, Treinamento prático para di- 
gitadores no CP-500 e Curso de BASIC para 
jovens de 10 a 18 anos. Maiores informações 
podem ser obtidas na Rua Segundo Wander- 
ley, 1144, Barro Vermelho, tel.: (084) 222- 
3212, Natal, RN. 

e CLUCOMP — Centro de Computação e 
Serviços oferece os seguintes cursos: BASIC, 
COBOL, FORTRAN, Assembler, Operação e 
Digitação. Todos com aulas teóricas e práti- 
cas, turmas pela manhã, tarde e noite e espe- 
ciais aos sábados e domingos. Início de novas 
turmas todo começo de mês. Maiores infor- 
mações na Rua Silva Bueno, 2239, Ipiranga, 
tel.: (011) 215-5625, São Paulo, SP. 

e Sistemas de Gestão em Microcomputado- 
res e Recursos Gráficos em Minicomputado- 
res são os dois cursos que o Brasil Trade Cen- 
ter-Divisão de Computadores e Sistemas está 
oferecendo. Os cursos têm duração de dois 
meses, O primeiro começa no dia 5 de novem- 
bro e o segundo no dia 19 de novembro. Tur- 
mas de, no máximo, doze alunos. Informações 
na Av. Epitácio Pessoa, 280, Ipanema, tels.: 
(021) 259-1299, 259-1499 ou 259-1542, RJ. 
e A SAESP — Sociedade Amigo dos Estu- 
dantes de São Paulo — inicia, a partir de 17 de 
outubro, um curso de BASIC. O curso terá 
uma turma de, no máximo, 20 alunos. As au- 
las serão às segundas, quartas e sextas-feiras, 
das 20:00 às 23:00h, com duração de quatro 
semanas. Maiores informações pelo tel.: (011) 
457-9355 ou 240-6616 ou ainda na sede da 
SAESP, na Av. Caminho do Mar, 2709, Rudge 
Ramos, São Bernardo do Campo, SP. 

e A CompuShow Computadores Ltda. está 
oferecendo cursos de linguagem BASIC | e || 
e também de Software Aplicativo de Micros. 
Turmas em vários horários. Duração de 20 ho- 
ras com aulas práticas em diversos micros. O 
preço de cada um dos cursos é de Cr$ 40 mil, 
pagáveis em duas parcelas. O endereço da 
CompuShow é SCRN 708/709, bl. E, Ij. 10, 
CEP 70740, Brasília, DF. 
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e A SCI — Sistemas, Computação e Informá- 
tica — está oferecendo os seguintes cursos no 
mês de novembro: Administração de Opera- 
ção do CPD, de 08 a 11, Rio; Informática pa- 
ra Usuários, de 10 a 11, São Paulo; Análise 
Estruturada para Sistemas com Banco de Da- 
dos, de 22 a 25, São Paulo; Planejamento Es- 
tratégico e Tático de Informática — Plano Di- 
retor, de 22 a 25, São Paulo; Elementos para 
Avaliação, Seleção e Utilização de Micros, de 
23 a 25, São Paulo; Técnicas para Aumento 
de Produtividade no Desenvolvimento de 
Software. O endereço da SCI no Rio de Ja- 
neiro é Rua Jardim Botânico, 635, 89 andar, 
tel.: (021) 294-7488 ou 294-7797, telex 
23864, CEP 22470; em São Paulo é Avenida 
Paulista, 2001, Grupo 1020, tel.: (011) 289- 
0099 ou 289-0079, telex (011) 23175, CEP 
01311,SP. 

e O Centro Latino Americano de Desenvolvi- 
mento da Informática — CLADI estará pro- 
movendo um curso de Análise Estruturada, de 
17 a 21 de outubro, na PUC-RJ, com carga 
horária de 35 horas. Inscrições e informações 
no CLADI, Rua Joseh Gonçalves de Medeiros, 
96, Madalena, CEP 50000, Recife, tel.: 227- 
2307, telex (081) 3171, PE. 

e O Departamento de Ciência da Computa- 
ção da UFMG e a Fundação de Desenvolvi- 
mento da Pesquisa — FUNDEP estão promo- 
vendo cursos sobre engenharia de software: 
Metodologia para Desenvolvimento de Siste- 
mas, de 11/10 a 08/11, das 18:00 às 22:00h; 
Planejamento e Controle de Projetos de Sis- 
temas, de 10/11 a 01/12, das 18:00 às 22:00h. 
Maiores informações na Avenida Antonio Car- 
los, Pampulha, Belo Horizonte, Cx. Postal 
1856 ou pelos telefones: 441-8077, r. 170/ 
158 ou 441-3933, MG. 

e A ADP Systems está oferecendo os seguin- 
tes cursos: Programação de Sistemas (sete me- 
ses); Operação de Sistemas (três meses); Aná- 
lise (quatro meses); Assembler (um mês); Di- 
gitação (um mês); BASIC (dois meses). Os 
cursos têm turmas pela manhã, tarde e noite, 
em diversos horários, inclusive aos sábados e 
domingos. Informações na Av. Paulista, 1439, 
cj. 31, tels.: (011) 285-3283, 285-4238 ou 
283-3157, São Paulo, SP. 

. Microshop, além dos cursos regulares pa- 
ra iniciantes e adiantados, está lançando cur- 
sos específicos para médicos e administrado- 
res hospitalares. A finalidade destes cursos é 
levar ao conhecimento desses especialistas as 
vantagens do uso de microcomputadores em 
consultórios e hospitais. Os cursos são ofereci- 
dos na sede da Microshop, na Alameda Lo- 
rena, 652, São Paulo, SP. 

e Baby-BASIC — Curso de iniciação em BA- 
SIC-TK para crianças entre quinto e oitavo pe- 
ríodos. A carga horária é de 24 horas, com au- 
las de uma hora de duração às segundas, quar- 
tas e sextas-feiras ou às terças e quintas-feiras 
com uma hora e meia de duração. Informa- 
ções pelo tel.: (011) 284-5635. 

e A CENADIN Comércio e Representações 
Ltda. promoverá cursos de iniciação em mi- 
crocomputadores e de iniciação a programa- 
ção BASIC, nos seguintes colégios: Col. Sto. 
Américo, Sagrado Coração de Jesus, Sto. 
Agostinho, Hebraico Brasileiro Renascença, 
Companhia de Maria, Brasil-Europa, Oswald 
de Andrade, Nuno de Andrade, Washington, 
Cardeal Mota e Galileu Galilei. Maiores infor- 
mações poderão ser obtidas à Av. Brigadeiro 
Antonio, 290, 69 andar, cj. 64, São Paulo, 
tel.: (011) 329834, SP. 








e Para informar ao leitor sobre os cursos que 
estão sendo oferecidos, a revista recolhe in- 
formações em diversas instituições ou as rece- 
be pelo correio. Portanto, não nos responsabi- 
lizamos por quaisquer alterações posterior- 
mente efetuadas por estas instituições nos 
programas ou preços. 
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CURSOS DE APERFEIÇOAMENTO 


CURSO DE ELETRÔNICA DIGITAL 
E MICROPROCESSADORES 


São mais de 140 apostilas com informações completas e sempre 
atualizadas. Tudo sobre os mais revolucionário CHIPS. E você 

recebe, além de uma sólida formação teórica, KITS elaborados 
para o seu desenvolvimento prático. Garanta agora o seu futuro 


CEDM-20 - KIT 

de Ferramentas 
CEDM-78 - KIT 
Fonte de Alimentação 
5v/1A. CEDM-35 KIT 
Placa Experimental 
CEDM-74 - KIT 

de Componentes. 
CEDM-80 
MICROCOMPUTADOR 
Z80 ASSEMBLER. 








Este CURSO, especialmente programado, oferece os 

fundamentos de Linguagem de Programação que domina o universo 
dos microcomputadores. Dinâmico e abrangente, ensina desde o BASIC 
básico até o BASIC mais avançado, incluíndo noções básicas sobre 
Manipulação de Arquivos, Técnicas de Programação, Sistemas de 
Processamento de Dados, Teleprocessamento, Multiprogramação e 
Técnicas em Linguagem de Máquina, que proporcionam um grande 
conhecimento em toda a área de Processamento de Dados 


KIT CEDM Z80 

BASIC Científico. 

KIT CEDM Z80 

BASIC Simples 

Gabarito de Fluxograma 
E-4. KIT CEDM SOFTWARE 
Fitas Cassete com Programas. 





MAIS SUCESSO PARA VOCÊ! 


Comece uma nova fase na sua vida profissional. 
Os CURSOS CEDM levam até você o mais moderno ensino 
técnico programado e desenvolvido no País. 


CURSO DE 


Métodos novos e inéditos de ensino garantem um aprendizado 

prático muito melhor. Em cada nova lição, apostilas ilustradas 

ensinam tudo sobre Amplificadores, Caixas Acústicas, Equalizadores, 
Toca-discos, Sintonizadores AM/FM, Gravadores e Toca-Fitas, Cápsulas 
e Fonocaptadores, Microfones, Sonorização, Instrumentação de Medidas 
em Áudio, Técnicas de Gravação e também de Reparação em Áudio 






a05010s 


CEDM-1 - KIT de Ferramentas. CEDM-2 - KIT Fonte de Alimentação 


KIT Placa Experimental 


+ 15-15/1A. CEDM-3 
CEDM-4 - KIT de Componentes. CEDM-S - KIT Pré-arplificador 
Estéreo. CEDM.-6 - KIT Amplificador Estéreo 40w. 


Você mesmo pode desenvolver um ritmo próprio de estudo. A lin- 
guagem simplificada dos CURSOS CEDM permite aprendizado fácil. E 
para esclarecer qualquer dúvida, o CEDM coloca à sua disposição uma 
equipe de professores sempre muito bem acessorada. Além disso, você 
recebe KITS preparados para os seus exercícios práticos. 

Ágil, moderno e perfeitamente adequado à nossa realidade, os CUR- 
SOS CEDM por correspondência garantem condições ideais para o seu 
aperfeiçoamento profissional. 


SEE GRÁTIS 22 


Você também pode ganhar um MICROCOMPUTADOR. 


Telefone (0432) 23-9674 ou coloque hoje 
mesmo no Correio o cupom CEDM. 
Em poucos dias você recebe nossos catálogos de apresentação. 





Avenida São Paulo, 718 - Fone (0432) 23-9674. 
CAIXA POSTAL 1642 - CEP 86100 - Londrina - PR 


CEDM 


CURSO DE APERFEIÇOAMENTO POR CORRESPONDÊNCIA 


CURSO de 
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O iniciar uma partida, o micro- 
computador costuma variar a 
abertura ou a defesa segundo 


determinado random (um fator aleató- 
rio em seu programa), o que já acontece 
mesmo na abertura da partida. 


Era de esperar que no estágio atual, 
passadas as jogadas armazenadas em sua 
memória, a relação de causa-efeito no 
mesmo nível fosse constante. Contudo, 
vez por outra nos deparamos com va- 
riações que não invalidam a regra geral, 
mas contribuem para evitar a repetição 
monótona de jogadas. 


O Great Game Machine revelou essa 
desejada versatilidade frente à posição 
mostrada no diagrama 1, que ocorreu 
após: 


1 — P4R P4R 
2 — C3BD C3BR 
3 — P4B P4D 


4 — PRxP PxP (4 min., 7 seg.) 

5 — B5C+ B2D (6 min., 40 seg.) 
6 — B4B BSCR (10 min., 36 seg.) 
7 — C3B P3B (13 min., 33 seg.) 
8 — D2R+ B2R (4 min., 28 seg.) 
9 — PxP CxP (21 min., 45 seg.) 
10 —- BSC 


A partir desta posição, o GGM jogou 


10 — ..TICD na primeira partida e 
10 — ...C4D na segunda. Vejamos as par- 
tidas: 

1a ne rtida: 

10 —... TICD (25 min., 38 seg.) 
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11 — 0-0 D3C+ (27 min., 7 seg.) 
12 — P4D BxC (30 min., 7 seg.) 
13 — TxB DxP+ (33 min., 41 seg.) 
14 — RIT C4T (34 min., 36 seg.) 
15 — T3D D4B (36 min., 38 seg.) 
16 — T5D DSC (41 min., Só seg.) 
17 — TxC etc. 


22 partida: 
10 —... C4D (23 min., 46 seg.) 

o! — 0.0 D3C+ (26 min ) 

12 — P4D BxcC (29 min., 27 seg.) 
13 — DxB DxP+ (36 min., 27 seg.) 
14 — RIT P3TD (37 min.) 

15 — CxC PxB (40 min., 11 seg.) 
16 — C7B+ R2D (45 min.) 

17 — TID DxT (46 min., 52 seg.) 
18 — DxD+ etc. 






Diagrama 1 — Posição após 10 — B5C. 


Enxadrista experiente, Luciano Nilo de An 
drade já escreveu para os jornais “Correio da 
Manhã”, “Data News” e “Ultima Hora” e pa 
ra a revista “Fatos & Fotos”. Luciano é econo 


mista, trabalhando no Ministério da Fazenda, 
no Rio de Janeiro. As opiniões e comentários 
de Luciano Nilo de Andrade, bem como as 
últimas novidades do Xadrez jogado por com 
putadores, estarão sempre presentes em 
MICRO SISTEMAS. 





SURPRESAS DO COMPUTADOR 


Nesta posição, a maioria dos jogado- 
res, sem pensar muito, jogaria 1 — ... 
R2C(?!). Contudo, o Kaissa jogou 1 — 
«TJIR e perdeu depois de 2 — DxT 
R2C. Haveria alguma coisa errada com o 
computador ou seu programa? 

No dia seguinte, foi perguntado ao 
Kaissa o que ele teria jogado depois de 
1 — ..R20(?!) se tivesse as brancas. A 
resposta foi fulminante: 1 — ... R2C; 
2 — D8BD+!! Surpreendente sacrifício 
de dama! 2 — ..RxD; 3 — B6T+ e de- 
pois de 3 — ..R1ICou 3 —... B2C as 
brancas jogaram 4 — T8B+ DID; 5 — 
TxD+ TIR;6 — TxT mate! 


Ya men 
mu 7a 
à o 


now 
emo ma 
dd 


Wi vo 
nara ár 
nn a 
É w s 


Diagrama 2 — Duchess x Kaissa, || Campeona- 

to Mundial de Computadores, Toronto, agos- 

to de 1977. Nesta posição as pretas jogaram 
— .. TIR(?!). 
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Science & Vie maio de 1983 
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As brancas jogam e dão mate em três jogadas. 
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O Great Game Machine, gastou 2 mi- 
mutos e 42 segundos para encontrar a jo- 
gada-chave da combinação com o Pro- 
gram Steinitz, com 2 — D8BR+!!. Para- 
doxalmente, gastou 3 minutos e 35 se- 
gundos para jogar 3 — B6T+! e anunciar 
mate em três jogadas, como previra o 
Kaissa. 


PROBLEMAS PARA OS LEITORES 


Aí vão dois problemas publicados na 
revista Scienge & Vie, para vocês tenta- 


Science & Vie junho de 1983 
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As brancas jogam e ganham rapidamente. 


rem resolver e testar a capacidade de 
seus micros enxadrísticos. 


Solução dos problemas: 
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e Traduções e versões 
exclusivas para a 
comunidade de informática. 

e Pioneiros no setor. 

e Manuais e publicações 
diversas. 

e Gráficos. 

e Supervisão Técnica de 
profissionais atuantes - 
analistas e consultores. 

e “Linguagens de alto nível" 
aliadas à qualidade / 
velocidade de entrega. 


oOiscover 
TRADUÇÕES 
Informações 
pelos telefones: 
(021) 264-6392 
264-7391 
228-2798 





| MPC-03 E O MPC-12 MOSTRAM QUE TAMANHO 
NÃO É DOCUMENTO. E DESEMPENHO. 





um equalizador que compensa 

as distorções normalmente 

encontradas em linhas discadas. 
Procure os dois pequeninos da 

Coencisa nas lojas especializadas. 
Eles vão apresentar 

o melhor documento 

da praça: 

o desempenho. 


Estão aí os dois modems da po um consumo reduzido e de 
Encisa que estão revolucio- aixo custo. 
do a transmissão de dados O MPC-03 opera em velocida- 
microcomputadores: de de até 300 BPS, no modo 
PC -03 e MPC -12. duplex ou semi-duplex, a dois fios 
Com um design moderno e em linhas privativas ou discadas. 
pacto, estes dois pequeninos 
item que você tire o máximo 
desempenho e eficiência, 


-12 é assíncrono e 
opera em até 1.200 BPS, em li- 
nhas privativas ou discadas, com 


Brasília: Tel.: (061) 591-4640 Indústria de Comunicações SA 
Rio: Tel.:(021)224-9172 e São Paulo:Teis.: (011) 240-3764 ou 543-5392 e Porto Alegre: Tel.: (0512) 24-4330 














Um pequeno roteiro do funcionamento do Interpretador BASIC Applesoft, da digitação à execução 

















Como funciona o Interpretador 
BASIC do Applesoft 


oda vez que fazemos uma en- 
trada de caracteres pelo tecla- 
do, as teclas que digitamos são, 
uma a uma, registradas no buffer do 
teclado (situado à página dois de memó- 
na do Apple, bytes 200 a 2FF, em hexa- 
decimal). Depois que pressionamos a te- 
cla RETURN, o Interpretador BASIC 
varre à sequência que escrevemos e pro- 
cura interpretá-la. 

Já no princípio, o computador iden- 
tifica se o usuário está desejando criar 
uma linha de programa ou simplesmente 
usando um comando de execução dire- 
ta. Caso a sequência de caracteres princi- 
pie por um número, estaremos escreven- 
do uma linha de programa que não será, 
portanto, executada imediatamente. 

Dessa forma, quando uma linha de 
programa acaba de ser digitada, o compu- 
tador vai identificar os comandos da hn- 
guagem BASIC que foram usados e re- 
gistrar a linha que acabou de ser intro- 
duzida em uma certa região de memória 
especialmente destinada ao registro de 
programas em BASIC. 
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Rudolf Horner Junior 


Para o caso do microcomputador 
Apple e de seus similares nacionais, é 
a partir da linha hexadecimal 800 (2048 
em decimal) que são registrados os pro- 
gramas em BASIC que estão sendo utili- 
zados. Para a versão mais antiga do 
Apple, aquela que não dispõe de lingua- 
gem BASIC Applesoft residente, o prin- 
cípio dos programas, uma vez carrega- 
dos na memória, fica no byte 3000 
(12288 em decimal). 

Quando vai ser registrada uma linha 
de programa na memória, o Interpreta- 
dor venfica em qual posição, entre todas 
as linhas que já tenham sido utilizadas 
anteriormente, deverá ser introduzida 
sua interpretação. Uma vez localizado 
este ponto, a linha de programa é regis- 
trada na memória e todos os comandos 
BASIC que são identificados são marca- 
dos com o uso de apenas um único byte, 
o que significa que o comando PRINT 
tem uma forma de representação inter- 
na que consome apenas um único byte. 

Exaste uma tabela onde todos os co- 
mandos são associados a um número 


de código e é este número que repre- 
sentará o comando quando da necessi- 
dade de registrá-lo. (Esta tabela consta 
dos manuais dos equipamentos e por 
isso não a mostraremos aqui.) 

Quando os comandos utilizam pará- 
metros, estes são igualmente registrados 
nestas áreas de memória. Ao usarmos 
mais de um comando-em cada linha, o 
Interpretador consome mais um byte 
para diferenciar um comando do outro. 
Para indicar o final da linha, o Interpre- 
tador registra um byte com o valor zero 
após os bytes que representam a linha 
digitada. Os números de linhas, que po- 
dem ir de 0a 63999, também são regis- 
trados pelo Interpretador. 


O processo para a criação de uma no- 
va linha de programa é muito simples: 


1 — O computador, após encontrar o 
ponto de onde a linha deverá entrar, 
registra, com o uso de dois bytes, um 
apontador que indica qual será o ende- 
reço da próxima linha do programa que 
está sendo armazenado. 
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2 — Depois deste apontador, nos dois 
bytes seguintes, o Interpretador registra 
o número da linha que acabou de ser re- 
gistrada. 

3 — Em seguida, sequencialmente con- 
forme a ordem de entrada, são registra- 
dos os códigos dos comandos e seus 
eventuais parâmetros. Para diferenciar 
comandos múltiplos em uma mesma 
linha, é usado um byte para separar cada 
comando, enquanto para representar o 
final da linha usa-se um único byte com 
o valor zero. 

Assim, para registrar uma única linha 
de um programa em BASIC, são consu- 
midos pelos menos seis bytes: dois bytes 
para o apontador para a próxima linha; 
mais dois bytes para o número da linha; 
pelo menos um byte para o código do 
comando; e, finalmente, um único byte 
com o valor zero para indicar o final da 
linha. 

Para que se saiba o lugar onde o ar- 
mazenamento do programa em BASIC 
está encerrado, o Interpretador BASIC 
marca três bytes sucessivos com o valor 
zero para representar o fim do registro 
do programa em BASIC. : 

Quando executamos o comando 
LIST, o que o computador faz é percor- 
rer a sequência de bytes a partir do en- 
dereço 800, escrevendo os números de 
linhas, os comandos representados pelos 


códigos armazenados e os parâmetros e 
variáveis usados no programa que fica- 
ram registrados na memória. 


lo HOME 


20 PRINT 
30 END 





Figura 1 


Para que seja mais fácil entender, veja 
a figura 1, onde temos um pequeno pro- 
grama que mostra como o Interpretador 
funciona. Na listagem da figura 2 está 
relacionada a sequência de bytes que 
codifica o programa em BASIC da figura 
1, representando o conteúdo dos bytes a 
partir do byte 800 (hexadecimal). Neste 
caso, os símbolos à direita que tenitam 
interpretar a sequência de bytes em co- 
mandos do processador 6502 não têm 
nenhum significado. Importam apenas 
os valores dos bytes localizados à direita 
dos números hexadecimais. 

Veja ainda na figura 2 como o Inter- 
pretador definiu o final da codificação 
do programa. Existe uma sucessão de 
três bytes com valor zero, que são os 
bytes de número 812, 813 e 814. Quan- 
do são encontrados estes três bytes se- 
guidos com valor nulo, sabe-se que a hs- 
tagem do programa chegou ao fim. 

Para registro do programa, a linha 
inicial, número 800, não é utilizada: o 


princípio real é, na verdade, na linha 
801. Nos bytes 801 e 802 existe um 
apontador para o byte 807, que é a h- 
nha seguinte do programa em BASIC (o 
byte 801 contém 07 e o byte 802 con- 
tém 08. No Apple, isto significa um 
apontador para o byte número 0807.) 
Em seguida, nos bytes 803 e 804, 
temos, respectivamente, os valores OA e 
00. Esta é a codificação da linha de pro- 
grama número 10. No byte 805, temos 
o valor 97, que é o código, em hexade- 














*800L 

0800- 0 BRK 

0801- 07 ??? 

0802- 08 PHP 

0803- 0A ASL 

0804- 0 BRK 

0805- 97 ??? 

0806- 0 BRK 

0807- oD 08 14 ORA $1408 

080A- oo BRK 

080B- BA TSX 

080C- 00 BRK 

080D- 13 ?2? 

080E- 08 PHP 

080F- 1E 00 80 ASL $8000,xX 

0812- 0 BRK 

0813- 00 BRK 

0814- 00 BRK 

0815- A ASL 

0816- 4c 4r 00 JMP $004F 

0819- 20 08 14 JSR $1408 
Lis ao 
Figura 2 » 











«<a KSR BI-DIRECIONAL 1D- 


único terminal teleimpressor fabricado no Brasil. 


ASA, Indústria de Impressoras S/A, acaba de lançar o 
primeiro teleimpressor genuinamente brasileiro. Sua alta 
tecnologia eletrônica, prova na prática sua capacidade 
de trabalho. Imprime por matriz de pontos 9x7, 
permitindo até 8 cópias impressas, com uma 


velocidade de 100 C.P.S. Equipado com 
memória standard de 2 K caracteres, 
utilizando formulário continuo, 
folhas soltas ou bobina de papel. 

De 64 até 132 caracteres por 

linha, com interface serial 

RS 232 elo de corrente e 

paralelo. Sua velocidade 

de comunicação é de 

50 a 9.600 B.P.S. 

8 diferentes 

tipos de 

impressão. 


A 


INDÚSTRIA DE IMPRESSORAS S.A. 
Escritorio: 

R. Prof. Jose Marques da Cruz, 234 
Fabrica 

Rua Centro Africana, 74 

Teis.: (011) 240-2442 - 543-4939 

Telex: (011) 36926HIM BR 

São Paulo -S.P. 
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Conheça mais 
detalhes do 
Teleimpressor 
KSR na 


GOECODATA 


SISTEMA DE PROCESSAMENTO DE DADOS E TELECOMUNICAÇÕES 


MATRIZ: Rio de Janeiro - R. Republica do Libano, 61 - 12º and. 


Tel.: (021) 221-4677 - Telex (021) 30187 


FILIAIS: S. Paulo - R. Frei Caneca, 1119. Tel.: (011) 284-8311 - Telex (011) 22191 
Brasilia - SCS 02 - Bloco Cn 41 -SL.01 - Tel.: (061) 225-1588 - Telex (061) 1750 
Porto Alegre - Rua Santa Terezinha, 300 - Tel.:(051)32-3564 - Telex (051) 2144 





Goiânia Belo Horizonte - Salvador 
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INSTITUTO DE TECNOLOGIA ORT 


CURSOS DE 
PROCESSAMENTO DE DADOS 


FORMAÇÃO DE PROGRAMADORES 
(COMPLETO) 
Duração: 8 meses 
Horário: 22 a $2 feira de 19:00 às 22:00 hs 
MICROCOMPUTADORES E A 


LINGUAGEM BASIC 


Duração: 3 semanas 
Horário: 28 a 54 feira de 19:00 às 22:00 hs 
Turmas de 15 alunos 


AMPLA UTILIZAÇÃO DO 
IBM—-4341 E DO LABORATÓRIO 
DE MICROCOMPUTADORES 


Visite o CPD-ORT - Diariamente após 
13:00 hs — R. Dona Mariana, 213 Botafogo 
Rio de Janeiro — Tels.: 226-3192 - 246-9423 


LOJA 
MICRO-KIT 


Livro de Basic vol. | 
Edição Própria 


CURSOS 


ape /adultos e -com méto- 
p crianças, 

o ud c/mestrado em ENGENHA- 
mara DE “gibi mais de 20 cursos 


nas aulas prá- 
oc MICRO IMPUTADOR. 


VENDA DE MICROCOMPUTADOR 
Unitron AP II, Digitus, TK e CP 200. 
Financiamento em até 24 meses. 

PROGRAMAS 
Comerciais e Jogos p/ APPLE, Unitron, 
Polymax, Digitus TK e CP200. 
Disquet Cab 97 Din Formu: 
es, Caixa p, es, - 
lários Continuos etc. 


VENDA DE E REVISTAS 
Despachamos para todo o Brasil. 


Rua Visconde de Pirajá, 303 S/Loja 
210 - Tels. (021) 267-8291 - 521-4638 
CEP 22410 - Rio de Janeiro 
Rua Visconde de Pirajá, 365 sobreloja 
209 - Ipanema 




















COMO FUNCIONA O INTERPRETADOR BASIC DO APPLESOFT 


cimal, que representa o comando HOME 
do BASIC. Desta forma, a linha 10 do 
programa da figura 1 foi registrada. O 
byte 806 com o valor nulo indica que a 
linha 10 já foi encerrada. 

No registro das outras linhas, o pro- 
cesso é análogo. A partir do byte 807, 
temos o apontador para a linha seguinte, 
mais dois bytes com o número da linha 
(que neste caso é 20), o byte 80B com o 
valor BA (que é o código que representa 
o comando PRINT) e o byte 80C com 
valor nulo, indicando o fim da linha 
número 20. 

No registro da linha 30 temos nos 
bytes 80D e 80E o apontador para a 
próxima linha. Desta vez não existe 
próxima linha, pois a presente é a última 
do programa. Por esta razão, o aponta- 
dor para a linha seguinte simplesmente 
aponta para o segundo byte da sequên- 
cia de três que define o final da codifica- 
ção do programa. E temos ainda, nos 
bytes 80F e 810, a representação hexa- 
decimal do número de linha 30 e, final- 
mente, no byte 80F o valor 80, que é 
o código do comando END. 

Aí está. Todos os programas BASIC 
são codificados com o uso deste proces- 
so. Desta forma, podemos alterar os pro- 
gramas de duas formas. Uma é fazer 
como sempre fazemos, ou seja, alteran- 
do o programa com os recursos normais 
de edição de programas. A outra forma 
é alterar os valores dos bytes que repre- 
sentam o programa com o uso do co- 
mando POKE ou mesmo entrando em 
Monitor. 





REM PROGRAMA TESTE DE NUMERO 
s 
PRINT 


PRINT 
PRINT 
PRINT 


Figura 3 


Veja um exemplo na figura 3. Trata- 
se de um programa simples em BASIC 
onde foram diretamente alterados os 
bytes onde estavam registrados os núme- 
ros das linhas do programa. Todos os 
bytes foram alterados de forma a esta- 
belecer o número 10 para todas as linhas 
de programa. 

Alguns recursos interessantes podem 
ser usados. Considere um programa que, 
quando executado, altere os valores dos 
bytes que o codificam. Trata-se do caso 
de um programa que altera a si próprio. 
Veja na figura 4 um exemplo. Tente 
executá-lo. Aparentemente, nada acon- 
tece. Faça uma listagem dele após sua 
execução e... surpresa! O programa per- 
corre ele próprio e muda o valor dos 


bytes que definem o número das linhas. ' 











90 
8 * 16 


2+1 


T=1'7Tolo 
B = PEEK (A) + 256 * PEEK (A + 
1) 
POKE A + 2,C : 


POKE A + 3,0 


=C-10 
IF PEEK (A) <> O OR PEEK (A + 
1) <> O THEN NEXT 
END 


Figura 4 





LO Bu dd 
FOR T 1 TO 10 
B (Cc) 4 + PEEK (A) + 256 * P 
EEK (A + 1) 
A = PEEK (A) + 256 * PEEK (A + 


1) 
IF PEEK (A) + 256 * PEEK (A + 
1) <> O THEN C=C+ 1: NEXT 


FOR D=0 TOC: 
78 : NEXT 
END 


POKE B (D), 1 





Figura 5 


Veja a linha 50. É nesta linha, com o 
uso do comando POKE, que os números 
das linhas são alterados. 

Experimente agora executar o pro- 
grama da figura 5. Desta vez, as linhas 
não são alteradas. O programa percorre 
sua codificação, anotando os endereços 
dos bytes que codificam o primeiro co- 
mando de cada uma das linhas. Depois, 
na linha 60, todos os endereços são 
preenchidos com o valor 178, que é o 
código do comando REM (em decimal). 
Desta forma, após a execução do progra- 
ma, os comandos iniciais de cada linha 
são iguais ao comando REM. 

Utilizando estes dispositivos podere- 
mos fazer qualquer coisa à listagem do 
programa sem, necessariamente, mexer 
com comandos da linguagem BASIC. O 
único detalhe importante é que, para 
termos sucesso em uma modificação, 
deveremos saber com exatidão em que 
endereço de memória está registrada a 
informação que desejamos alterar. m 

[o 


Rudolf Horner Junior cursa Ciência da 
Computação na Unicamp e é sócio do Poten- 
cial Software, empresa que desenvolve progra- 
mas especiais para microcomputadores em 
Campinas, SP. 
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Maxxti,o micro pessoal muito 
profissional da Polymax. 


rucuisao De veses 


i é um microcomputador pessoal — profissional de grande versatilidade 

urada possibilidade de expansão. Compatível com APPLE Il 
5”, aceita mais de 5 mil programas aplicativos disponíveis no mercado. 
Característica padrão inclui um monitor e linguagem Polysoft Basic, ambas 
jas em ROM, com 2 kbytes e 10 kbytes, respectivamente, 48 kbytes de 
ória RAM disponíveis para o usuário; interface para gravador cassete, 
p e tv colorida (sistema PALM); teclado padrão ASC Il e fonte de 
tação, dispostos em um gabinete próprio. 


aqui sua essência técnica: 


roprocessador 
E operando com frequência de 1 MHZ. 




























O 
od possui um vídeo profissional de 12” com fosfatização verde e pode 
tar-se também com uma televisão comum (colorida ou preto & branco), 
fando no modo texto ou gráfico (baixa ou alta resolução), sendo 
pletamente transparente ao usuário o acesso à memória. No modo gráfico, 
imas 4 linhas do vídeo operam no modo texto. Todos os modos de 
fação com o vídeo são selecionáveis por Software. 
o Texto 
caracteres/linha, 24 linhas 
acteres 5 x 7. 
normal, reverso e piscante. 
antrole pleno do curso. 
p Gráfico 
a resolução) 
Bh x 48v ou 40h x 40 v com 4 linhas de texto. 
cores selecionáveis por Software. 
Bmando específicos do Polysoft Basic para uso 
B Modo Gráfico: COLOR, PLOT, HLIN, VLIN, SCRN. 
ja resolução) 
Oh x 192 v ou 280 h x 160 v com 4 linhas de texto. 
selecionáveis por Software. 
Bmandos específicos do Polysoft Basic para uso no modo 
o: HCOLOR, HPLOT. 
m do vídeo residente em 8 kbytes. 


PORTO ALEGRE (RS) - Fone: 42.7833. 


ABC (SP) - Fone: 454-4922 - BELO HORIZONTE (MG) - BRASÍLIA (DF) - Fone: 2725-1456 - CURITIBA (PR) - Fone: 2336632 


ALEGRE (RS) - Fone: 42-3311 - RIO DE JANEIRO (Rj) - Fone: 252-8274 - SÃO PAULO (SP) - Fone: 283-3722 


DE REVENDEDORES. 
(SP): Soma - 24-2558 - BELÉM (PAX: Pam - 222-9772 - BELO HORI 


= 2431731 - DUQUE DE CAXIAS (RJ: CPM - 7710312 - FORTALEZA (CE: General Data - 2262610 


(AM: 
ALEGRE (R$): Advancing - 26-8246 - DB - 22-56 











5797 IVADOR 
233752 - SÃO UUIZ (MAK MPA - 221-1755 - SÃO PAULO (SPk: Audio - 220: 

222 - Infordata - 853-5740 - Mappin - 2 

42-2175 - VITÓRIA (ES): Taborda - 222-5395. 


IZONTE 225-3305 - julio Lobos - 2256519 - BRASÍLIA (DF): Compushow - 2773-2128 - GB - 2426344 - MB - 2 
1 - CAMPO GRANDE (MS): DRL - 3182.6487 - New Line - 624-5349 - CAMPINAS (SP): Microsystems - 51-1542 - Microtok - 32-3910 - CAXIAS DO SUL (R$): Digipampa - 2271-4559 - CURITIBA (PR): Comicro - 7245616 - Compustore 
A (GO): Gendados - 224-5487 - TTAJAÍ (SO): Entec - 440244 - JOINVILLE (SO): Comicro - 22-5858 - JUIZ DE FORA (MG: 

CPO - 237-1793 - MOGI DAS CRUZES (SP): Runners House - 4683779 
| - 24141 - Informatic 


MG): Compucity - 2266336 - Computronics 


NOVO 
100 - PORTO. k 214189 - Microsis - 22:9782 - Processa - 26-08] 
5: General Data - 2220357 - Intertécnica - 341-2467 - Mekros - 224-3216 - RIO DE JANEIRO (RJ: Clap : 234:0214 - Computique - 267-1093 - Eldorado - 227-0791 - Garson - 252-2050 - Kristian - 252.9057 - Micromag - 222.608 
5 (BA): Sismac - 2430991 - SANTA MARIA (RSk: Digipampa - 2216952 - SANTA ROSA (RS): Agnoleto - 512-1399 - SANTOS (SP): Kaufimann - 341476 - Sisper - 37-4705 JOSÉ DOS CAMPOS (SP): 
22 - Compushop - 212-9004 - Compute - 852:8290 - Computerland - 258-3954 - Data 27 
SOROCABA 


7311 - Microshop - 282-2105 - Prokura - 32-9776 - PS! - 531.9902 - Reflex - 883-2440 - Tiger - 2129522 


Agora vamos 
processar os dados 
... técnicos dele. 


A memória dinâmica RAM é organizada em 3 incrementos de 16 kbytes cada 
um, num total de 48 kbytes totalmente disponíveis para o usuário. Esta 
memória pode ser aumentada conforme a necessidade do usuário adicionando 
placas de expansão. Possui também 10 kbytes de ROM para armazenamento 
do Polysoft Basic e 2 kbytes de ROM para o sistema monitor. Sistema de 
“Refresh” automático, completamente transparente. Memória rápida — tempo 
de acesso de 350 ns. 


Entrada e Saída 

O Maxi inclui um teclado com padrão ASC Il; interface para gravador cassete, 
vídeo e tv colorida sistema PALM; um conjunto de 8 conectores para a ligação 
de cartões controladores de periféricos e expansões; 3 entradas de 1 bit, 4 
entradas analógicas para conexão de “joystick” e 4 saídas digitais de 1 bit 


Polysoft Basic 
Possui características básicas do padrão Basic com técnicas de forma a propiciar 
máximo rendimento dos recursos de Software do produto. 


Monitor 

Gravado em ROM com 2 kbytes. 

Periféricos e acessórios disponíveis 

O Max de concepção modular, cresce de acordo com os periféricos a ele 
incorporados, dentre os quais destacamos: TV comum, a cores ou preto & 
branco — Monitor profissional Polymax de 12” com fosfatização verde 
Unidade de drives de disquetes de 5/4”, organizado com 25 trilhas, 16 setores 
de capacidade de 256 bytes cada um — Unidade de gravador cassete — 
Interface serial para impressora — Impressora Polyprint 90 CPS de 80/132 
colunas — Controladores de jogos — Interface serial para comunicação de 
dados — Modem — Placa de expansão de memória RAM para 64 kb — Placa 
de CPU Z-80 (sistema operacional CP/M) — Placa Videx expansora de vídeo de 
40 para 80 colunas — modulador de R.F, 


a 
a us 

* Outros produtos da = 

« POLY 301 WP "a 

POLY 201 DP * POLY 105 DP 

* POLY 201 DE * POLYNET Ma. 
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olymax 


E PERIFÉRICOS SA 


Filiada à ABICOMP 








2123809 
HAMBURGO (RS): Micromega - 93-4721 - PASSO FUNDO (RS): Digipamps - 312-3169 - PELOTAS (R$): COS - 254139 
36 - RIBEIRÃO PRETO (SP): Compusys - 635-1195 - Khedi e 634-1715 - Memocards 
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* Apple é marca registrada de Apple Computer Inc 
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BIBLIOTECA DE SOFTWARE 


Para solucionar os problemas de 
quem necessita de software, desde os 
programas genéricos até os especificos 
de cada área, surge em São Paulo a Bi- 
blioteca Brasileira de Software. A BBS 
possui um acervo de aproximadamente 
quatro mil programas para microcompu- 
tadores das linhas Apple, TRS-80 e Sin- 
clair. Para usufruir deste acervo, o inte- 
ressado deve tornar-se assinante, me- 
diante uma taxa de inscrição e uma taxa 
de manutenção mensal. A BBS oferece 
também a seus associados palestras e 
cursos nas diversas áreas de interesse. 
Uma infra-estrutura composta de micro- 
computadores e demonstradores está 'a 
disposição dos assinantes na sede da 
BBS, para orientá-los sobre a correta uti- 
lização dos programas. Maiores informa- 
ções podem ser obtidas através dos tele- 
fones (011) 210-1251 e 813-6407. 





Microcomputador 1-7000, da Itautec. 


ENTRADA DE DADOS 
NO 1-7000 


Os usuários do microcomputador 
Itautec |-7000 poderão em breve utilizar 
os seus equipamentos para entrada de 
dados. E que a empresa está desenvol- 
vendo o software SED — Sistema de En- 
trada de Dados, que permite gravar dire- 
tamente em formato IBM, dispensando a 
conversão. De acordo com o fabricante, 
uma das principais características desse 
software é o seu alto nível de consistên- 
cia dos dados em tempo de digitação. 

Usando oito dos 64 Kbytes de memó- 
ria RAM do micro |-7000, o interpretador 
do SED — software totalmente compati- 
vel com os programas de entrada de 
dados em linguagem TAL — deixa os 
restantes 56 Kbytes disponíveis como 
buffer de entrada de dados. O SED será 
apresentado em cartucho de EPROMs 
para uso no |-7000, estando também dis- 
ponivel em disquete 


24 


APPLY 300 


Produzido para ter uma aceitação 
rápida no mercado, o Apply 300, da CDSE 
— Centro de Desenvolvimento de Siste- 
mas Eletrônicos, possui várias caracte- 
risticas para facilitar o usuário, tais como: 
teclado de 69 chaves, tipo membrana 
flexível; feedback auditivo BIP; RESET 
de máquina em duas teclas pressionadas 
simultaneamente e apenas uma para 
RESET do BIP; teclas numéricas duplica- 
das; RUBOUT,; EDIT; GRAFIC; FUNCTION; 
ENTER; THEN; TO; teclas independentes 
de SHIFT; entre outras. 

O APPLY 300 utiliza o microproces- 
sador Z80-A de 8 bits, com uma frequên- 
cia de 3.25 MHZ de clock e com 8 Kb de 
ROM, onde reside o interpretador BASIC. 
Sua capacidade de memória é oferecida 
em três versões: 16 K, 32 K e 48 K bytes. 

Quanto aos periféricos, o APPLY 300 
conta com serial tipo RS 232-C, para im- 
pressora ou comunicação com outros 
sistemas. Esta capacidade possibilita a 
utilização de qualquer impressora dispo- 
nivel no mercado, ou até mesmo adapta- 
ções em IBM de esfera, por exemplo. 


UM APLE Il PLUS 
BRASILEIRO! 


A Milmar Indústria e Comércio Ltda, 
de São Paulo, está lançando o Apple Il 
Plus, que, como diz o nome, é integral- 
mente compatível com seu “irmão gé- 
meo” americano. A única diferença, se- 
gundo seu fabricante, é que o modelo 
nacional é adaptado para ser ligado ao 
televisor a cores no sistema Pall-M. O 
Apple |l Plus tem UCP com microproces- 
sador 6502, velocidade de 1 MHz, 48 
Kbytes de memória RAM expansiveis até 
64K e oito conectores para ligações de 
periféricos. Possui saida para video, ope- 
rando com televisor preto e branco ou a 
cores, saída para gravador cassete e tra- 
balha com controlador de até quatro uni- 
dades de disquetes de 5 1/4”. O teclado 
do Apple Il Plus possui 52 teclas, seme- 
lhantes às da máquina de escrever, e te- 
cla especial para repetição automática. 
O equipamento tem um alto-falante inter- 
no para emissão de vozes e músicas. O 
Apple Il Plus já está sendo comerciali- 
zado em lojas especializadas. 


ALTA RESOLUÇÃO 


Os usuários dos computadores 
TK82-C, TK83/85, CP-200 ou NE-Z8000 
contam agora com mais um recurso para 
seus equipamentos: adaptação de alta 
resolução. Este recurso possibilita a cria- 
ção de desenhos mais detalhados, úteis 
em jogos e aplicações técnicas, como 
desenhar circuitos, mapas e plantas. Atra- 
vés das lojas Computique e Imarés, am- 
bas em São Paulo, a adaptação de alta 
resolução em micros pessoais pode ser 
feita por Cr$ 45 mil. 








o 
C E) 
LIMPEZA DE COMPONENTES 


Contacmatic é um produto fabricado 
pela Marmo Indústria de Produtos Qui- 
micos para limpeza de produtos eletrô- 
nicos. Trata-se de um solvente suave em 
forma de spray que possibilita a limpeza 
sem tocar nos componentes. Seu uso é 
indicado para a limpeza e restauração de 
continuidade elétrica em todo tipo de 
contato. O produto vem sendo usado em 
empresas de processamento de dados, 
bancos e indústria eletrônica para limpar 
cabeças magnéticas, circuitos impressos, 
etc. Contacmatic é encontrado nas lojas 
de peças e componentes eletrônicos, 
bem como nos fornecedores de micro- 
computadores. 


NEXUS 1600 


Um microcomputador de 16 bits, 
totalmente compativel com o IBM PC, é 
o novo lançamento da Scopus que esta- 
rá sendo mostrado ao público durante a 
IH Feira de Informática, em outubro, em 
São Paulo. O Nexus 1600 funciona com 
microprocessador Intel 8088 e, segundo 
o Gerente de Produto Silineu Perez Nu- 
nes, integra-se dentro de uma nova fami- 
lia de micros, diferente dos que a Scopus 
vinha trabalhando até então. Uma novi- 
dade é seu design. O equipamento está 
dividido em três módulos: teclado, moni- 
tor de vídeo e parte lógica. O teclado al- 
fanumérico está ligado ao sistema por 
cabo tipo mola, podendo ser operado à 
distância de até 1,5 m da unidade cen- 
tral, São quatro os modelos de monito- 
res de video disponiveis para o Nexus, 
sendo dois preto e branco e dois a cores. 
O video padrão, de média resolução, tem 
80 colunas por 24 linhas e fósforo verde. 
Junto à parte lógica do equipamento 
estão embutidos dois drives para disque- 
tes. A memória do sistema compreende 
64 Kbytes de EPROM e a memória para o 
usuário vai desde 64 Kbytes de RAM, 
passando pelas versões com 128 e 256K, 
além de placa de expansão de 512 Kby- 
tes. Na configuração básica, com video 
de média resolução, o preço do Nexus é 
de 1.600 ORTN's mais 10% de IPI, e sua 
comercialização será feita diretamente 
pela Scopus ou via revendedores cre- 
denciados. 
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MLOGO DA MICROARTE 





A software house paulista Microarte 
colocando no mercado a sua versão 
linguagem LOGO, hoje considerada 
o a primeira para o aprendizado de 
putação. A MLogo, da Microarte, é 
versão modificada da original, com 
os comandos em português. A 
ogo foi desenvolvida para os micro- 

putadores nacionais compatíveis com 
Apple Il e para utilizá-la é necessário 
equipamento com, no mínimo, 64 
es de memória RAM, um drive para 
uetes e uma impressora opcional. 
MLogo pode ser encontrada nas lojas 
pecializadas na comercialização de 
icros e periféricos. 

























































NOVIDADES PROLÓGICA 


A Prológica firmou convênio com a 
ftware-house DbMicro, para forneci- 
nto do Dbll para os usuários do Siste- 
700. O Dbll é a versão nacional do 
ta Base Il, linguagem de fácil compre- 
ão que foi criada nos Estados Unidos 
ra ser utilizada pelos engenheiros da 
SA. 
Também para os usuários do S-700, 
Prológica está lançando o Super File, 
istema de disco rigido que utiliza a 
tecnologia Winchester, para ampliar a 
capacidade de armazenamento de dados 
e aumentar a velocidade de recuperação 
de informações. O Super File será ofere- 
cido em duas versões: de 5 e 10 Mbytes 
formatados. Nos próximos meses, a Pro- 
lógica estará colocando no mercado o 
disco rigido Winchester W-500, de 5 e 10 
Mbytes. E para dezembro, a empresa 
está prometendo o lançamento do W-500, 
de 15 Mbytes. 

E o CP-200, outro equipamento da 
Prológica, está sendo fabricado agora 
com a função Speed, que aumenta a ve- 
locidade de transmissão de dados para o 
gravador bem como a velocidade de lei- 
tura, de 300 para 4.200 Bauds (caracte- 
res por segundo). 


PRÓ ELETRÔNICA 


Inaugurada recentemente em São 
Paulo, a Pró Eletrônica possui microcom- 
putadores, periféricos, suprimentos, vi- 
deogames, literatura nacional e estran- 
geira. Na Pró Eletrônica, o cliente encon- 
tra equipamentos da Unitron, Polymax, 
Sysdata, Prológica e Microdigital. A loja 
desenvolve software atendendo às ne- 
cessidades dos clientes e dá assistência 
técnica para os micros que vende. São 
oferecidos regularmente cursos de lin- 
guagem BASIC, Sistemas Operacionais e 
aplicativos, além de parestras sobre In- 
formática. A nova loja fica na Rua Santa 
Efigênia, 568, Tel.: (011) 221-9055, São 
Paulo. 
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LINGUAGEM LOGO 


Dois estudantes da Escola Politéc- 
nica da USP, Fábio da Cunha e Jecel 
Mattos Jr., desenvolveram e estarão lan- 
cando na Feira de Informática o PEGAS- 
SOS, primeiro microcomputador que vem 
com linguagem LOGO. Segundo Fábio 
da Cunha, a linguagem LOGO é a mais 
adequada para se aprender computação 
por sua facilidade de uso, dai sua grande 
aplicação junto a crianças. O PEGASSOS 
funciona com microprocessador 6809, da 
Eletrola, com velocidade de 1MHz. A me- 
mória do sistema é de 16Kbytes de ROM, 
podendo chegar até 64K, e a memória do 
usuário é de 64Kbytes. O novo micro tem 
teclado alfanumérico, com todos os ele- 
mentos do portugues, como ç e todos 
os acentos. O equipamento ja vem com 
interface embutida para iigação com gra- 
vador cassete e com televisor comum, 
inclusive TV a cores (8 cores no sistema 
Pall/M). O PEGASSOS possui sistema 
operacional gratico, som, e tem expan- 
soes para aisco, impressora e para iiga- 
ção a um outro micro. Pode tambem 
receber cartuchos com jogos e com ou- 
tras inguagens. 


O R 470 DA RITAS 


Com novidades no teclado, maior ve- 
locidade de leitura, aprimoramento de 
alguns comandos BASIC e capacidade 
de 8 Kb de ROM e 16 Kb de RAM, ambas 
expansiveis, a Ritas do Brasil, tradicional 
fabricante de botões de pressão, está 
lançando o microcomputador RINGO 
R 470. 


O RINGO utiliza uma CPU Z-80, te- 
clado com 49 teclas, inclusive para edi- 
ção e correção com repetição automáti- 
ca. Ele possui ainda os comandos PRINT, 
PLOT, SCROLL e CLS mais aprimorados. 
A velocidade de gravação normal é de 
2.400 BPS, sem que o desempenho do 
gravador e da fita comprometam a leitura 
pelo micro. 

A capacidade do R 470 é de 8 Kb de 
ROM e 16 Kb de RAM, expansíveis para 
16 Kb e 48 Kb, respectivamente, e traz 
ainda cartuchos de memória ROM INS- 
TANTSOFT engatáveis no aparelho, que 
não ocuparão a memória RAM, possibili- 
tando a operação instantânea do progra- 
ma. Todos estes cartuchos poderão utili- 
zar uma resolução gráfica de tela, com 
definição de 256 x L192 pontos. 


Um dos cartuchos acoplaveis ao 
RINGO é um editor para linguagem de 
máquina. Com ele, o operador tem todos 
os recursos para editar programas ja ter- 
tos em linguagem de maquina para ou- 
tros micros da mesma faixa e podera tam- 
bem fazer novos programas utilizando 
15 Kb de programas nesta linguagem 
O mesmo cartucho permitira a leitura e 
gravação de EPROMs de 2 ou 4 kb, de 
qualquer dos modelos existentes no mer- 
caao. 






















Teis.: 220-7888 — 221-9055 — Telex (011) 34901 — POEC 






U ENDEREÇO 
DE TODOS U5 
MILAOS 


Em nossa loja somos todos 
Pró-informática, Pró-didática e 


Pró-eletrônica. 
Sysda 


=== ss 
FLEXIDISK 







SIIPOK 


acroDera 4Ã 
Pofqmax tb Unitron 












Rua Santa Efigênia, 568 — CEP 01207 — São Paulo — SP 








O LIMPA 


“FREON" TF. 


CONTACMATIC é um limpador específico 
para equipamentos eletrônicos. CONTAC- 
MATIC contém Freon TF, que deixa conta- 
tos, relês, seletores de canais, cabeças mag- 
néticas de computadores e gravadores, me- 
canismos de precisão, máquinas de calcular, 
relógios e muita coisa mais, limpo, limpo, co- 
mo novo! 

Para melhor manutenção: 

COOLERMATIC, congelador de circuitos pa- 
ra facilitar a localização de defeitos intermi- 
tentes em circuitos eletrônicos (aerosol 
200grs.). 

ISOMATIC, laca para proteger e isolar circui- 
tos impressos contra oxidação (aerosol 
150grs.) 

SILIMATIC, lubrificante seco à base de silico- 
ne para equipamentos eletrônicos e de preci- 
são. Repele umidade e protege contra oxida- 
ção (aerosol 200grs.). 

THERMATIC, pasta térmica para dissipar ca- 
lor em componentes eletrônicos. Aumenta a 
condutibilidade térmica entre o dissipador e o 
semi-condutor (embalagem de 15grs., 
100grs. ou à granel) 


A VENDA NAS LOJAS DO RAMO 


MR.0 
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MARMO & FILHOS LTDA. 


[Vendas e administração: R Ribeiro de Lima, 453 Bloco D 


6º andar cj 605 CEP 01122 Caixa Postal 957 
São Paulo SP F. 2225451 e 2236585 
Fábrica: R Duarte de Azevedo. 568 
CEP 02036 São Paulo SP F 2996051 


VENTILADOR PARA 
LINHA APPLE 


A Termatic Juntas de Expansão Ltda. 
está lançando no mercado o ventilador 
Micro-Fan. Destinado a evitar falhas nos 
microcomputadores causadas pelo su- 
peraquecimento, o Micro-Fan é montado 
diretamente na grade de ventilação do 
Microengenho, Unitron e Apple Il, dis- 
pensando o uso de parafusos e ferra- 
mentas. O ventilador possui duas toma- 
das para conectar o computador e o mo- 
nitor de vídeo que, controladas por inter- 
ruptor e lâmpada piloto, garantem a liga- 
ção simultânea de todo o sistema. O en- 
dereço da Termatic é: Av. Mercedes Benz, 
390, Distrito Industrial de Campinas — 
SP. CEP 13.100, tel.: (0192) 31-0633. 


Micro-Fan, ventilador da Termatic para 
micros da linha Apple 





SUPRIMENTOS 


A Simigra — Suprimentos e Equipa- 
mentos para Computação Ltda. comer- 
cializa, em Curitiba e  Florianó 
polis, uma ampla linha de suprimentos 
para processamento de dados. Os pro- 
dutos vendidos incluem fitas impressoras 
nacionais; fitas, discos e disquetes mag- 
néticos; pastas para formulário contínuo; 
etiquetas auto-adesivas; formulários con- 
tínuos padrão; recuperação de discos 
magnéticos; máquinas de corte e separa- 
ção de formulários contínuos; estabiliza- 
dores eletrônicos para micros, minis e 
grandes computadores; modems. 

Os endereços da Simigra são: Curi- 
tiba — Rua 24 de maio, 2937 — Parolin, 
tel.: (041) 224-9002; Florianópolis — Av. 
Osmar Cunha, 15 — 8.º andar, s/811, tel.: 
(0842) 23-1091. 


STRINGS 


e AAIT — Automação Industrial, Infor- 
mática e Telecomunicações Ltda acaba 
de incorporar o Departamento de Auto- 
mação e Controle da AEG — Telefunken 
Sistemas Industriais Ltda. A AIT atua na 
solução de problemas relacionados com 
o controle do tempo real de processos 
industriais, 


e A Brascom passa a oferecer ao mer- 
cado, a sua linha de microcomputador 
BR1000 M Multiusuário, com o proces- 
sador Zilog Z80 B, com clock de 6 MHz. 
Esta transformação aumenta em 40% a 
velocidade de processamento. 


e Aparas de formulários continuo, pa- 
pel de impressora, livros e revistas ve- 
lhos podem fazer sobreviver a Fundação 
para o Livro do Cego no Brasil. Atraves- 
sando séria crise econômica, há alguns 
meses a Fundação vem promovendo in- 
tensa campanha para arrecadação de 
papel a ser reaproveitado na impressão 
de livros para os cegos. 


e A Livraria Nobel, de São Paulo, aca- 
ba de criar um novo departamento: a 
Nobel Computadores, que comercializa 
micros pessoais, software, periféricos e 
suprimentos, além dos livros e revistas 
especializados. 


e Foi inaugurada em São Paulo a 
STAUF Processamento de Dados Ltda. 
A nova software house oferece alguns 
sistemas comerciais e se dedica ao de- 
senvolvimento de programas específicos. 


e A dB/MICRO de São Paulo está lan- 
çando um novo sistema para gerencia- 
mento de banco de dados, o dBASE/II. 
O sistema foi projetado para usuários 
que não conhecem a linguagem de pro- 
gramação. Seu objetivo é ensinar como 
manobrar dados (arquivos), como fazer 
relatórios e como fazer sistemas básicos. 


e A Cobra está oferecendo às empre- 
sas de Artes Gráficas um novo sistema 
de geração de textos a serem fotocom- 
postos, constituído pelo microcomputa- 
dor Cobra 305 e pelo software denomi- 
nado Sistema Processamento da Palavra 
— SPP. 


e O Instituto Brasileiro de Administra- 
ção Municipal — IBAM está oferecendo, 
em listagens ou gravados em disquetes, 
diversos dados referentes aos munici- 
pios brasileiros. Essas informações estão 
disponíveis no setor de Processamento 
de Dados do Instituto, através do SIM — 
Sistema de Informações Municipais. 
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O QUE PROGRAMAR? 

O grande potencial do Computador de Bolso PC-1211 R 
'E RP está no fato de, como um verdadeiro micro de bolso, 

“Ser totalmente programável em “BASIC”, linguagem fácil de 
programação, adotada pela maioria dos microcomputadores 
xistentes hoje no mercado. 

O POCKET COMPUTER permite aplicações nas mais 
diversas áreas. Todas as equações, cálculos, fórmulas e 
modelos emuladores utilizados dia a dia pelos engenheiros, 
'economistas, topógrafos, arquitetos, financistas, estudantes 
e outros, tem na PC-1211 uma aplicação imediata, 
economizando tempo e agregando agilidade, pois sendo de 
bolso, pode ser usada em qualquer local, onde o equipamento 
se faça necessário (na obra, no cliente, no avião, no carro, na 
escola, em casa e até no escritório como os outros não 
portáteis). 


2.COMO PROGRAMAR? 


Operacionalmente, a PC-1211 permite utilizar um 
gravador de áudio comum para gravar programas e dados, 
mais a impressora incorporada e a sofisticação da 
programação que aceita palavras como dados, nos 
possibilitando usar o equipamento para: controlar estoques, 
emitir planilhas e tabelas de financiamento, calcular retorno 
de investimentos; controlar horários de consultas e 
audiências de médicos e advogados; realizar cálculos 


"ROGRAMADA SHARP 


estatísticos em laboratórios ou institutos de pesquisa; 
formulação de ração balanceada na agropecuária; controlar 
saldos bancários e orçamentos domésticos; divertimentos e 
tantas outras aplicações que você pode desenvolver após 
aprender a programar (Informe-se s/ curso gratuito de 
Linguagem Basic - “CENPRO”). Ê 

Se não bastasse isto; a SHARP criou o “NUCLEO DE 
INFORMAÇÕES DO POCKET COMPUTER”, que tem por 
objetivo reunir os usuários compradores da PC-1211 num 
“clube de software”, permitindo o intercâmbio de programas 
entre os próprios usuários, e oferecer apoio e informações 
através de uma publicação periódica, divulgando os 
programas enviados pelos usuários, atendendo consultas, 
promovendo cursos, palestras, publicando artigos de 
especialistas em diferentes áreas, além de divulgar os 
programas desenvolvidos pela própria SHARP. 


3.0 PROGRAMA! 


Aceite nosso convite para esse “programa”, visite 
um Revendedor SHARP para conhecer o Pocket Computer 
PC-1211, um novo conceito em cálculo e computação pessoal 
ou informe-se sobre esse “programa”, através do Núcleo 
de Informações do Pocket Computer (Fones: (011) 259-1052/ 
284-5662). 

Nota.: Este “clube” já tem mais de 5.000 sócios no Brasil, 
ganhe um “título gratuito” e ingresse no mundo da 
informática com a PC-1211 - SHARP. 


TECNOLOGIA 


SHARP 


ONTEM, PARA . 
HOJE. PARA MILNÕES 





Produsido na Zone Franca de Manaus 











Para muitos usuários, a presença de um Monitor em seu micro 
é transparente. Mas, para os que programam em Assembler, ele é fundamental! 





Programas Monitores 


raticamente todos os sistemas 

operacionais em disco incluem 

vários programas utilitários pa- 
ra auxiliar o programador em alguns 
objetivos específicos. Assim, temos 
editores para a edição direta dos setores 
do disco, transferidores de programas 
entre disco e fita magnética, recupera- 
dores de programas eliminados aciden- 
talmente, spools para imprimir textos 
enquanto o computador realiza outra 
tarefa, Editor Assembler e Monitores. 

O Editor Assembler e o Monitor são 
utilitários importantes para quem pro- 
grama em linguagem de máquina. O 
Editor Assembler permute que possamos 
escrever o programa usando os mnemô- 
micos, que serão posteriormente conver- 
tidos em programa objeto. Normalmen- 
te, todo programa precisa de uma fase 
de testes, onde são identificados e elimi- 
nados os erros (bugs). 


Uma ferramenta muto útil para ana- 
lisar, criar ou modificar e testar progra- 
mas escritos em linguagem de máquina 
é o Monitor. Em função desta utilidade, 
existem dezenas de Momtores no merca- 
do, cada um oferecendo maiores facili- 
dades e realizando sua tarefa melhor 
do que outro. 


No CP/M, por exemplo, temos o 
DDT; no DOS 500 existe o DEBUG; no 
CP-500 exaste o Monitor residente; nos 
sistemas NEWDOS 2.0 e DOSPLUS 3.4, 
existe um Monitor semelhante ao 
DEBUG,; e assim por diante. Disponíveis 
no mercado encontramos os seguintes 
monitores (para a linha TRS-80): 
ZBUG, da Microsoft, que acompanha o 
EDTASM+; o ULTRA-MON, da Interpro; 
STEP-80, da Mumford Micro Systems; o 
TASMON, da The Alternate Source; 
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MON-4 e 5, da Howe Software, o 
MACRO-MON, da Advanced Operating 
Systems; RSM-2, da Small Systems Soft- 
ware; e mais uma dezena de outros. 

Pode-se perguntar: em que reside a 
utilidade de um programa Monitor? 
Quais os tipos de ações que podem ser 
realizadas com tal utilitáno? O objetivo 
deste artigo é justamente esclarecer os 
usos e funções desta importante ferra- 
menta. 


O MONITOR 


Basicamente, um Monitor é um pro- 
grama escnto em linguagem de máquina 
que permite ao programador interagir 
com o seu programa, também escrito em 
linguagem de máquina. Ele é indispensá- 
vel na depuração desta classe de progra- 
mas, por permitir uma execução contro- 
lada. Isto quer dizer que podemos definir 
pontos de interrupção (breakpoints) 
dentro do programa que estamos tes- 
tando, de maneira: que quando um des- 
tes pontos é encontrado, o Monitor re- 
cupera o controle da situação, permitin- 
do o exame do conteúdo dos registros 
da UCP no momento da interrupção. 
Pode-se também executar o programa 
em câmara lenta, de maneira interpreta- 
tiva. 

Além desta facilidade de execução 
controlada, os Monitores oferecem 
uma grande variedade de comandos. 
Uma opção das mais comuns nos Moni- 
tores é a de permitir a visualização e al- 
teração do conteúdo dos endereços da 
memória RAM, bem como a visualiza- 
ção do conteúdo dos endereços da ROM. 
Esta visualização pode ser em ASCII 
ou hexadecimal, sendo que alguns 
Monitores oferecem a possibilidade ex- 


tra de se visualizarem-os conteúdos em 
ASCII, hexadecimal e binário. 

Normalmente também é possível a 
visualização e alteração dos registros do 
usuário (veja adiante), uma opção im- 
portante para testar programas em situa- 
ções pré-determinadas. Além disso, a 
execução pode ser imiciada em qualquer 
endereço do sistema, bastando para isto 
teclar um comando e o endereço inicial 
desejado, como se pode também inter- 
romper esta execução num dado ende- 
reço, estabelecendo-se um breakpoint. 

São encontrados também comandos 
de carga/gravação de programas em ln- 
guagem de máquina, tanto para disco 
como para fita magnética, e alguns Mo- 
mitores informam ainda os endereços 
inicial, final e de execução (entry-point) 
de um programa recém-carregado. 


A EXECUÇÃO CONTROLADA 


Examinemos, mais acuradamente, a 
execução controlada que é oferecida pe- 
los Monitores, e que pode ser implemen- 
tada de duas maneiras. 

Na primeira delas, o controle é possí- 
vel porque o Monitor permite definir 
pontos de interrupção dentro do progra- 
ma que estamos executando com o au- 
xílio do mesmo. Quando um breakpoint 
é encontrado durante a execução do 
programa, o Monitor recupera o contro- 
le da situação. Existem, portanto, duas 
situações: uma delas é a execução do 
programa em teste; a outra (quando o 
breakpoint é encontrado) é a execução 
do Monitor. 

Desta forma, coexistem dois grupos 
de valores que, alternadamente, serão 
utilizados pela UCP, ora executando 
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programa em teste, ora executando o 
itor. Estes valores a que nos referi- 
são os conteúdos dos registros da 
. Pense no seguinte: quando um 
kpoint é encontrado, o Monitor re- 
ra o controle e os registros da UCP 
utilizados para executar o Monitor. 
as condições, o Monitor deve ser 
de armazenar os valores contidos 
registros no momento da interrup- 
, antes que os mesmos sejam carrega- 
s com os valores adequados à execu- 
do Monitor. 
Isto implica na necessidade de uma 
a de armazenamento, onde o conteú- 
dos registros do programa em teste 
m ser guardados. É a existência 
ta área de armazenamento que per- 
te executar o programa em teste com 
a certa situação de dados nos regis- 
s. (O comando do Monitor que per- 
te a visualização e alteração do con- 
údo dos registros acessa esta área de 
azenamento para realizar sua fun- 
o.) Note-se que, antes de, iniciar a 
xecução do programa em teste, o Moni- 
r carrega os registros da UCP com os 
ores contidos na área de armazena- 
nto dos registros do usuário. Por ou- 
o lado, quando o breakpoint é encon- 
trado, o conteúdo dos registros da UCP 
guardado na área de armazenamento 
tes do Monitor assumir o controle, 
de modo a ficarem disponíveis para o 
usuário. 
Um inconveniente deste tipo de exe- 
ção controlada reside no seguinte: 
durante a execução do programa em tes- 
te, o Monitor não tem controle sobre a 
esma, enquanto o breakpoint não for 
contrado. Se o programa entrar em 
loop, teremos de ressetar o computador, 
pois não há controle sobre a execução; 
existe controle somente quando o 
breakpoint é encontrado. 

Outro problema ocorre quando ten- 
tamos analisar uma rotina da ROM. Nes- 
te caso, não é possível defimr um break- 
point, já que esta defimção implica em 
colocar uma instrução especial no ende- 
reço especificado pelo usuário, o que 
não pode ser feito em uma memória 
ROM. 


A EMULAÇÃO 


O segundo modo de implementar a 
execução controlada permite executar 
O programa enquanto se monitora dina- 
micamente o conteúdo dos registros e 


de partes da memória RAM. A isto se 
denomina Trace: as instruções são exe- 
cutadas em câmara lenta, permitindo ao 
usuário uma visão detalhada das 
ações do programa (pode-se ajustar a 
velocidade do Trace dentro de certa fai- 
xa de valores), com as instruções visual- 
zadas em mnemônicos e em hexadeci- 
mal. 

Pode-se também executar o programa 
instrução por instrução, isto é, passo a 
passo (single step), com total controle. 
Além disso, existem Monitores que per- 
mitem a execução com duas telas: uma 
do programa, onde a ação do mesmo se 
desenvolve, e uma do Monitor, onde as 
instruções são apresentadas e o conteú- 
do dos registros visualizados, podendo- 
se mudar de uma tela para outra com o 
simples apertar de uma tecla. Estas duas 
telas também podem ser apresentadas de 
de uma vez só, repartindo-se o display 
entre as duas. Numa outra opção, pode- 
se executar passo a passo ou em câmara 
lenta de maneira transparente, isto é, 
embora o Monitor controle a execução, 
na tela só visualizamos a ação do progra- 
ma em execução. As sub-rotinas podem 
ou não ser executadas em profundidade, 
sendo a nível ajustado pelo usuário. 

Este tipo de execução controlada é 
denominado de Emulação, no qual as 
instruções sao executadas de maneira in- 
terpretativa e o Monitor mantém con- 
trole em todos os momentos. O Mom- 
tor possui uma área especial de execu- 
ção de instruções, onde a instrução a ser 
executada é copiada. Porém, antes de 
ser efetivamente executada, ela sofre 
uma interpretação: se for uma instrução 
de desvio (incondicional, condicional ou 
relativo), apenas simula-se a sua execu- 
ção e alteram-se os registros do usuário 
para refletir a nova situação. Se for uma 
chamada ou um retorno de sub-rotina, 
manipula-se de modo a manter-se efeti- 
vamente o controle antes de executá-la 
de fato. As outras instruções são execu- 
tadas a partir da área especial e o con- 
trole retorna ao Monitor sem haver ne- 
cessidade de breakpoints. 

Este tipo de execução é preferível 
quando as rotinas ou programas assim 
executados não possuem tempos críti- 
cos, como ocorre em acesso a discos, 
por exemplo. Para testar este tipo de ro- 
tina, a execução com breakpoint é pre- 
ferível, pois se evita o tempo consumido 
na interpretação da instrução e a execu- 
ção se faz à máxima velocidade. 


Se a intenção é aprender a programar 
em linguagem de máquina, este tipo de 
execução controlada é preferível aos 
breakpoints. Usando a Emulação pode- 
se inclusive analisar programas gravados 
em ROM. Normalmente, quando se ini- 
cia a execução com um Monitor deste 
tipo, a tela é preenchida com grande 
número de informações, permitindo 
controle total sobre a execução. A ins- 
trução a ser executada é mostrada em 
hexadecimal e em mnemônicos e existe 
uma parte da tela onde a ação do pro- 
grama em análise se desenvolve, enquan- 
to que na outra parte é visualizado dina- 
micamente o conteúdo dos registros da 
UCP. 


OUTROS COMANDOS 


Embora seja menos frequente, alguns 
Monitores oferecem comandos para ant- 
mética hexadecimal e conversão deci- 
mal-hexadecimal. Outra característica 
interessante é a relocabilidade dos Moni- 
tores, isto é, pode-se executar o Monitor 
em qualquer parte da memória RAM. 
Isto é importante porque evita conflitos 
de memória quando o programa a ser 
analisado ocupa a mesma região da 
RAM que o Monitor. (Existe um coman- 
do que reloca o Monitor para qualquer 
região da RAM.) 

Em função da Emulação que alguns 
Monitores oferecem, podem-se disassem- 
blar programas para o vídeo e, opcional- 
mente, para a impressora. Além disso, 
sao encontráveis também os seguintes 
comandos: 

— Cópia de blocos de dados entre dois 
endereços da memória. 

— Uso das portas de E/S para entrada e 
saída de dados. 

— Pesquisa e substituição de bytes e en- 
dereços. 

— E/S pela interface R$232C. 

— Cálculo de checksum (soma de con- 
trole) de blocos de memória. 

— Preencher blocos de memória com 
um determinado byte. 


— Múl b ints. = 
tuplos breakpoints. e 
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CENTRALDATA 


SUPRIMENTO É COISA SÉRIA 


* Matenha o seu computador bem alimentado adquirindo produtos de qualidade consagrada. 















Com. é Representações Ltda. 







Discos Magnéticos: 5 Mb, 16 Mb, 80 Mb etc 
Diskettes: 5 1/4, e 8 Polegadas — Simples e Dupla Face 


ETIQUETAS PIMACO — PIMATAB 
















TASSAMAILIAS 





482 - GR. 207 
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TELS 





021) 263-5876 - 253-1120 - RJ 


nética: 600, 1200 e 2400 Pés 

BOFITAS p/Impressoras: Globus M 200 — B 300/600 
« Fita p/Impressoras: Elebra, Digilab, Diablo, Centronic etc. 
Cartucho Cobra 400 
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Para ajudá-lo na escolha, um resumo das principais características dos 
DOS para os micros compatíveis com o TRS-80 | e Il. 





DOS: um para cada usuário 


oa parte dos microcomputado- 
B res nacionais são compatíveis 

com os famosos micros ameri- 
canos, TRS-80 modelos I e III da Radio 
Shack (figura 1), e quando adquindos 
na configuração com discos, vêm nor- 
malmente com um DOS baseado no 
TRSDOS que, venhamos e convenha- 
mos, não é um dos melhores DOS exis- 
tentes. 

Um DOS (Disk Operating System) 
nada mais é do que um programa que 
controla a operação dos computadores 
que utilizam discos. A grosso modo, o 
DOS dos micros nacionais consiste de: 
um programa executivo 
várias rotinas auxiliares do sistema 
uma biblioteca de comandos 
alguns programas utilitários 
uma extensão ao BASIC residente 
O programa executivo é carregado na 
RAM logo que o computador é ligado e 
um disco com o DOS é colocado no dri- 
ve O, ficando armazenado na memória 
até que o computador seja desligado. 
Ele inclui algumas rotinas do sistema, 
tabelas de endereços, apontadores e con- 
troladores de entrada e saída. 

As rotinas auxiliares do sistema con- 
têm várias rotinas e comandos que são 
carregados somente quando necessário. 
Estas rotinas são sempre carregadas so- 
bre uma mesma área da memória do 
computador. Quando o DOS acaba de 
executar uma rotina, ele entra com a ro- 
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FABRICANTE EQUIPAMENTOS COMPATÍVEL COM DENSIDADE DOS DISCOS 
Dígitus DGT 100/101 modelo 1 dupla 

Dismac D-8002 modelo | simples 
Prológica cP-500 modelo 11 dupla 
Kemitron NAJA modelo Ill dupla 
Sysdata JR modelo 1I1 dupla 

Sayfi TRS-BO/IV modelo LI1 dupla 

Figura 1 


tina seguinte, superpondo-a à primeira 
num processo conhecido como overlay. 
Este tipo de procedimento gasta menos 
memória do computador, mas por outro 
lado faz com que o processo seja um 
pouco mais lento, devido ao tempo de 
carga destas rotinas. 

A biblioteca de comandos (aqueles 
que aparecem no vídeo quando entramos 
com o comando LIB) contém as rotinas 
necessárias à execução da maioria dos 
comandos do operador. É gravada numa 
determinada área da memória mas pode 
ser apagada pelos programas utilitários. 
Para recarregá-la, basta entrar com al- 
gum dos comandos da biblioteca. 

Os utilitários são programas que ser- 
vem para propósitos específicos, tais 
como: copiar um (BACKUP), co- 





lar um arquivo de um disco para outro 
(COPY) ou formatar um disco (FOR- 
MAT). 

A extensão da linguagem BASIC é 
um programa que, quando passado para 
a memória, adiciona vários comandos ao 
BASIC residente, permitindo, inclusive, 
O acesso a arquivos em disco. 


COMO ESCOLHER O DOS? 


Na hora de escolher o DOS, creio que 
os fatores mais importantes a serem le- 
vados em consideração seriam: 
velocidade de operação 
utilitários fornecidos 
facilidades no manejo 
documentação 
compatibilidade com outros DOS 
preço 
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A ordem de importância destes fato- 
vai depender exclusivamente do 


ário. 

Todos os DOS que a seguir analisare- 
os são americanos (que me perdoem 
xenófobos, mas simplesmente não 
ste DOS desenvolvido no Brasil para 
ta classe de micros) e embora eles 
pmpatibilizem os modelos 1 e III, deve 
observado que um disco gravado no 
modelo III só poderá ser lido pelo mo- 
elo I se este tiver um controlador de 
ensidade dupla e drive de 40 trilhas. 
ejamos um a um. 


e DBLDOS 


O DBLDOS é essencialmente o 
RSDOS alterado para aceitar densida- 
dupla no modelo 1. É comercializado, 
intamente com um controlador de 
sidade dupla, pela Percom Data 
orp. (11220 Pagemil Road, Dallas, 
5243, USA) e custa em torno de 
$$170 (devido ao fato de vir com um 
componente eletrônico — o controlador 
ele tem sua importação proibida). 

quase totalmente incompatível 
com os outros DOSs, não apresentando 
iferenças significativas sobre o 
TRSDOS original. Não vale a pena, por- 
to, nos aprofundarmos sobre ele. 


e DOSPLUS 3.4 





É comercializado pelo Micro System 
Software (5846 Funston St. Hollywood, 
FL 33023, USA), custando cerca de 
US$ 150. 

Ele pode ler um disco formatado 
belos outros DOSs (exceto o DBLDOS), 
conhecendo automaticamente a den- 
idade do disco que está sendo lido. É 
um sistema operacional recomendado 
a quem planeja mais tarde partir para 
ma configuração com discos Winches- 
r, pois é praticamente idêntico ao seu 
mão mais novo DOSPLUS 4.0, desen- 
olvido para configurações com este ti- 
po de disco (o preço é mais ou menos 
US$ 1.900, com um disco de S Mbytes 
importação proibida). 

O DOSPLUS tem repetição automá- 
tica da tecla que estiver sendo pressiona- 
da; repetição do último comando (““/”); 
possibilidade de execução de arquivos 
de comandos (DO); compatibiliza os 
modelos I e III desde que o primeiro te- 
nha drives de densidade dupla; permite a 
itura de um disco gravado em densida- 
simples no modelo I por um modelo 
II e pode formatar discos de 40 trilhas 
sm drives de 80. 
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Alguns comandos da biblioteca de 
comandos são diferentes dos do 
TRSDOS. Por exemplo, o comando DIR 
é equivalente ao DIR(A) do TRSDOS, 
enquanto que o CAT é que é equivalen- 
te ao DI Através do  DOSPLUS 
podemos redirecionar uma saída do 
vídeo a a impressora e vice-versa 
(FORCE) ou então duplicar uma 
saída do vídeo na impressora (JOIN). 

Como utilitários de uso geral temos: 

um Spooler para a impressora (um 
Spooler é um programa que acumula os 
dados a serem enviados para a impresso- 
ra num buffer de memória, liberando a 
UCP do computador para outras fun- 
ções — quem costuma tirar listagens de 
programas sabe como é enervante ficar 
esperando que a impressora libere o 
computador); um COPY para equipa- 
mentos com apenas um drive; um pro- 
grama que faz a compressão de progra- 
mas BASIC gravados no disco 
(CRUNCH) e um outro que examina os 
arquivos em disco (D) UMP) ou en- 
tão os altera (DISKZAP). 
Podemos ainda recuperar arquivos 
deletados RE), transferir pro- 
gramas SYSTEM da fita para o disco e 
tirar cópias múltiplas de arquivos 
(TRANSFER). 

Com relação ao BASIC, o DOSPLUS 
oferece a possibilidade de abreviarmos 
vários comandos; permite mover e dupli- 
car linhas de programa; aceita TAB em 
LPRINT além de 64 colunas; permite o 
controle de entradas no vídeo 
(INPUT & ); ordena vetores matrizes 
etc. Além disso, o DOSPLUS fornece 
um BASIC comprimido (TBASIC) que 
não é tão poderoso como o outro, mas 
serve para executar a maioria dos pro- 
gramas, ocupando menos espaço na me- 
mória do computador. 

Seu manual de 240 páginas é bastan- 
te detalhado, apresentando inclusive 
uma seção que descreve os pontos de 
entrada e saída das rotinas do DOS e do 
DCB (Device Control Block). 





e LDOSS.1 


O LDOS é uma evolução do extinto 
VTOS. É comercializado pela Logical 
Systems Inc. (11520 N. Port Washing- 
ton Rd., Mequon, WI 53092, USA) e 
seu preço gira em torno de US$ 130. 

Sem dúvida, tem o melhor e mais 
bem escrito manual entre os DOSs exis- 
tentes, e os proprietários registrados re- 
cebem trimestr te uma revista — 
The LDOS Quarterly — contendo várias 
informações, alterações e utilitários. 

Para que o LDOS possa ser emprega- 
do com densidade dupla, é necessário 
usarmos o utilitário PDUBL, o qual deve 
ficar permanentemente armazenado no 
topo da memória do computador. Utili- 


zando o comando SYSGEN, esta confi- 
guração ficará gravada no disco, de mo- 
do que sempre que você colocá-lo no 
dnve e apertar o RESET, o PDUBL será 
carregado. Há, no entanto, a possibilida- 
de de que o PDUBL possa criar alguns 
problemas com outros programas que 
também residam no topo da memória. 

A biblioteca de comandos do LDOS 
é similar à dos outros LDOSs, apenas 
com destaque especial para o comando 
CONV, que permite a leitura de um 
disco gravado pelo TRSDOS do modelo 
HI por um modelo I. Por sinal, é o único 
DOS que oferece esta facilidade. 

Como utilitários, o LDOS oferece um 
Spooler para a impressora; a possibilida- 
dade de copiar arquivos por data ou ti- 
po, inclusive entre drives de densidades 
diferentes; facilidades para a utilização 
de disco Winchester; um programa para 
comunicação entre micros (LCOMM) 
através da interface RS-232, e outro 
(CMDFILE) para transferência de pro- 
gramas SYSTEM da fita para o disco, os 
quais podem ser, ao mesmo tempo, al- 
terados. 

Uma das características mais podero- 
sas do LDOS é o seu Job Control Lan- 
guage (JCL). Quem já usou computado- 
res de grande porte sabe como pode ser 
útil um JCL. Os outros DOSs normal- 
mente oferecem os comandos CHAIN 
ou DO que permitem o encadeamento 
de vários comandos do DOS, mas ne- 
nhum deles oferece um JCL verdadeiro. 

O JCL do LDOS é uma linguagem 
compilada que pode manipular decla- 
rações condicionais, expressões lógicas, 
variáveis etc. Ele permite que você cons- 
trua macros nos seus programas, ou seja, 
basta especificar o nome do macro que 
o LDOS automaticamente realiza uma 
série de operações complexas. 

O BASIC do LDOS, conhecido como 
LBASIC, não é tão poderoso quanto o 
BASIC dos outros DOSs, porém permite 
a execução passo a passo de programas 
e ainda oferece facilidades no que tange 
à depuração dos mesmos. Com relação à 
linguagem propriamente dita, o coman- 
do RESTORE foi alterado, permitindo 
especificar o número da linha que o 
ponteiro dos DATAs deve apontar. É 
possível também ordenar vetores e enca- 
dear programas sem perder as variáveis 
na memória. 





e MULTIDOS 


O MULTIDOS foi escrito por Vemon 
Hester (Vemon Hester e Kim Watt são 
considerados os papas da manipulação 
de discos em linguagem de máquina, 
tendo cada um deles vários programas 
de sucesso nos EUA). É comercializado | 
pela Cosmopolitan Electronics Corpora- ss, 
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tion (P. O. Box 89, Plymouth, Michi- 
gan 48170, USA) e é o DOS mais bara- 
to que existe no mercado (aproximada- 
mente US$ 100). Mesmo assim, incor- 
pora várias características que os seus 
concorrentes mais caros não possuem. 


Para começar, é o único DOS total- 
mente compatível com os demais. Isto 
quer dizer que ele pode ler um disco for- 
matado por qualquer DOS, coisa que ne- 
nhum outro faz. Outro detalhe impor- 
tante é o fato de que se você remover o 
disco do drive O e o DOS tentar acessar 
alguma das rotinas do sistema (obvia- 
mente não vai conseguir), você não per- 
derá o controle do computador. Nos de- 
mais DOS, quando isto ocorre, o com- 
putador fica completamente travado. 


Outras características de menor im- 
portância são: repetição automática do 
último comando (basta apertar a tecla 
ENTER), e a possibilidade de leitura e 
gravação do cassete (CLOAD, CSAVE, 
SYSTEM) sem a necessidade de desligar 
e ligar o relógio de tempo real (CMD“T” 
e CMD“R”) — isto porque o MULTI- 
DOS reconhece os comandos do cassete 
e interrompe o relógio automaticamen- 
te, acionando-o após completada a ins- 
trução. 

Apesar das vantagens oferecidas, 
ocorre um problema durante as opera- 
ções de leitura/gravação no disco: ele 
acusa uma incidência de erros do tipo 
DATA RECORD NOT FOUND DU- 
RING READ maior que os outros. Ao 
que parece, isto está ligado ao número 
de vezes que o MULTIDOS faz a verifi- 
cação das operações de leitura e grava- 
ção (4 contra 10 dos outros DOS). 


Com relação aos comandos da biblio- 
teca, o MULTIDOS apresenta muitos 
comandos além dos existentes no TRS- 
DOS. A partir dele, nós podemos desar- 
mar a tecla BREAK; criar e executar ar- 
quivos DO; especificar o número de co- 
lunas por linhas e estas por página da 
impressora (FORMS); selecionar um ca- 
ráter qualquer para o cursor, inclusive 
especificando se ele deve ficar piscando 
ou não (KEYBRD); desviar uma saída 
da impressora para O vídeo e vice-versa 
(ROUTE); duplicar uma saída do vídeo 
na impressora e vice-versa (LINK); pro- 
teger o topo da memória (TOPMEM); 
e mais alguns comandos. 


Como utilitários do sistema, o MUL- 
TIDOS oferece um BACKUP que per- 
mite tirarmos cópias com um único dri- 
ve e ao mesmo tempo alterar o número 
de trilhas do disco-destino; um COPY 
que proporciona a cópia de um arquivo 
usando apenas um drive, qualquer que 
seja a formatação do disco-fonte e do 
disco-destino; e um FORMAT que pode 
formatar um disco em densidade simples, 
dupla ou P (do DBLDOS). 
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Já como utilitários de uso geral te- 
mos: um Editor/Assembler; um explo- 
rador da RAM que localiza palavras de 
um ou dois bytes na memória; um utili- 
tário gráfico que permite a entrada de 
caracteres gráficos diretamente do te- 
clado; um Spooler para a impressora e 
um utilitário para mani 7 de ar- 
quivos (VFU — Versatile File Utility). 

Em relação ao BASIC, o MULTIDOS 
tem o melhor BASIC dentre os ofereci- 
dos pelos DOSs (chamado SUPER- 
BASIC), além de um outro utilizado na 
programação e depuração de programas, 
chamado BBASIC. 

O SUPERBASIC é o que menos ocu- 
pa espaço na memória, deixando cerca 
de 40000 bytes livres para você. Isto 
acontece porque ele trabalha em regime 
de superposição (overlay). Com ele po- 
demos recuperar um programa BASIC 
após apertarmos o botão de RESET ou 
o comando CMD“S” (volta para o DOS) 
através do comando BASIC*, mesmo 
que o programa tenha sido deixado por 
outro DOS (BASIC!) ou que desejemos 
retornar ao BASIC residente (BASIC). 


Adicionalmente, podemos falar do 
comando Pn, que mostra no vídeo uma 
determinada página do programa; da fa- 
cilidade de abreviar vários comandos; da 
capacidade em renumerar o programa ao 
todo ou em parte, procurar strings den- 
tro de um programa e mudar nomes de 
variáveis. Existe ainda uma série de co- 
mandos do tipo CMD“X” que: compri- 
mem o programa sem retirar os comen- 
tários (CMD“C”), mostram no vídeo o 
último erro ocorrido (CMD“E”); zeram 
todos os elementos de uma matriz 
(CMD“K”); deletam uma matriz de me- 
mória do computador (CMD“L”); mo- 
vem uma linha de programa (CMD“M”); 
duplicam uma linha de programa 
(CMD“N”); abrem um buffer adicional 
de arquivo (CMD“O”); ordenam uma 
string ou vetor (CMD“Q”); e mostram 
no vídeo todas as variáveis escalares e 
seus valores (CMD“V”). Não podemos 
esquecer de mencionar o comando 
NAME, que carrega um programa sem 
perder as variáveis presentes na memória. 


O BBASIC nada mais é do que um 
SUPERBASIC incorporado a um geren- 
ciador de programas. Ele proporciona a 
execução passo a passo do programa, a 
inspeção de um grupo predefinido de 
variáveis, além de incluir um TRACE 
melhorado. Por causa disso, o BBASIC 
ocupa um pouco mais de memória do 
que o SUPERBASIC. 


O manual não é muito detalhado (70 
páginas) e exige que você já tenha uma 
razoável experiência com o TRSDOS, 
pois ele explica apenas as diferenças en- 
tre o MULTIDOS e o TRSDOS. 


e NEWDOS80 20 


Comercializado pela Apparat, Inc. 
(4401 So. Tamarac Parkway, Denver, 
CO 80237, USA), o NEWDOS80 ver- 
são 2.0 custa em tomo de US$ 150, 
sendo juntamente com o DOSPLUS 
um dos DOSs mais caros do mercado. 

Sua formatação é totalmente diferen- 
te dos outros DOSs, pois não utiliza o 
conhecido conceito de grânulos (um 
grânulo é a menor parte do disco que 
pode ser alocada para um arquivo e 
equivale a 1/2 trilha no modelo 1), mas 
sim de lumps. E o que é um lump? Nem 
o manual explica. 

Apesar disso, ele pode ler discos for- 
matados pelos outros DOSs, desde que 
seja reconfigurado com o comando 
PDRIVE cada vez que um disco com 
formatação diferente for lido. Uma van- 
tagem oferecida é que os discos forma- 
tados pelo NEWDOS80 são lídos tanto 
pelo modelo III como pelo I com densi- 
dade dupla. 

Com relação à sua biblioteca de co- 
mandos, que é bastante grande, pode- 
mos destacar as facilidades de:desarmar 
a tecla BREAK; criar arquivos de co- 
mandos encadeados (DO); enviar o con- 
teúdo do vídeo para a impressora (JKL); 
proteger o topo da memória (HIMEM); 
mostrar uma mensagem no vídeo e 
aguardar até que o ENTER seja pressio- 
nado (PAUSE) (para utilização em ar- 
quivos DO; imprimir um arquivo na im- 
pressora (PRINT); repetir o último co- 
mando (R); desviar uma saída do vídeo 
para a impressora e vice-versa (ROUTE). 

Ele apresenta ainda um mini-DOS, o 
qual permite a execução de todos os co- 
mandos da biblioteca exceto o APPEND, 
CHAIN, COPY e FORMAT, ocupando 
menos espaço no disco. 

A respeito dos utilitários, o NEW- 
DOS80 oferece o popular SUPERZAP 
que altera os arquivos no disco; uma ver- 
são modificada do Editor/Assembler da 
Radio Shack; um Disassembler que en- 
via O programa em mnemônicos Z-80 
para o disco e para a impressora e/ou ví- 
deo simultaneamente; um utilitário que 
transfere programas SYSTEM da fita pa- 
ra o disco LMOFFSET) mesmo que o 
programa transferido ocupe a área de 
memória utilizada pelo DOS; um 
Spooler para a impressora (ASPOOL); e 
um utilitário para criação e edição de 
arquivos CHAIN e DO (CI BLD). 

De maneira geral, o BASIC do NEW- 
DOS80 é quase tão bom quanto o do 
MULTIDOS. Com ele podemos desar- 
mar a tecla BREAK; encadear e fundir 
programas (MERGE) que não estejam 
gravados em ASCII; determinar as li- 


MICRO SISTEMAS, outubro/83 


São Paulo: 
. Angélica, 2578 
Fone 231.3922 


O micro com interface para vídeo colorido. 

Com essa inovação a Digitus amplia ainda mais a versatilidade e a eficiência dos 
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e Sintetizador de voz. 

e Interface paralela para impressora ti- 
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nhas em que uma dada variável aparece 
(REF); apagar variáveis selecionadas da 
memória (CMD“F =ERASE”) ou apagar 
todas as variáveis da memória exceto as 
selecionadas (CMD“F = KEEP”); apagar 
todos os RETURNs e NEXTSs abertos da 
pilha de endereços de retomo (stack) 
do BASIC; deletar dinamicamente linhas 
de programas; trocar o conteúdo de 
duas variáveis (SWAP); executar o pro- 
grama passo a passo; recuperar um pro- 
grama deletado e ordenar vetores ou 
matrizes (CMD“O”). 

Sobre o acesso a arquivos de dados, 
podemos dizer que o BASIC do NEW- 
DOS80 é o mais poderoso de todos — 
cerca de 85 páginas do manual se dedi- 
cam exclusivamente a este item. Além 
dos conhecidos acessos sequencial e ran- 
dômico, o NEWDOS80 apresenta mais 
dois tipos: Marked Item (que se divide 
em três subtipos) e Fixed Item (que se 
divide em dois subtipos). Estes acessos 
podem manipualr registros de até 4095 
bytes de comprimento, e embora sejam 
de difícil compreensão para o iniciante, 
não resta dúvida de que são bastante po- 
derosos. 

Infelizmente, o NEWDOS80 não re- 
conhece automaticamente a densidade 


NES 


| 


funcionamento e manutenção e pode ser utilizado em linhas privativas ou discadas. 





dos discos lidos, mas a firma The Alter- 
nate Source (704N. Pensylvania Ave., 
Lansing, Michigan 48906, USA) vende 
um programa chamado DDSD que custa 
US$ 20, possibilitando ao NEWDOS8O 
o reconhecimento automático da densi- 
dade dos discos, sem termos que utilizar 
o comando PDRIVE a toda hora. 

Aos proprietários registrados do 
NEWDOS80, a Apparat fomece gratui- 
tamente novas alterações do DOS à me- 
dida que forem sendo desenvolvidas. 


EM RESUMO 


Como você pôde observar, cada DOS 
tem seus pontos fracos e fortes. O 
DBLDOS não é compatível com os ou- 
tros. O DOSPLUS tem o DISKDUMP, 
DISKZAP, e reconhece automaticamen- 
te a densidade dos discos. O LDOS tem 
um excelente manual e oferece um bom 
apoio técnico ao usuário, fomecendo 
ainda um JCL poderoso. O MULTIDOS 
é barato, compatível com os demais e 
tem um BASIC excelente. Entretanto, 
peca por apresentar alguns problemas de 
leitura/gravação. O NEWDOS80 possui 
um Disassembler, um SUPERZAP e tem 
o melhor BASIC no que diz respeito a 


acesso a arquivos. Entretanto, não reco- 
nhece automaticamente a densidade dos 
discos. 

Sua escolha dependerá muito do tipo 
de aplicação a que se destina, mas quan- 
do adquirir um destes DOSs, não se es- 
queça de mencionar: 

e o modelo do seu computador (com- 
patível com Modelo 1 ou II?); 

e a densidade e número de trilhas dos 
seus drives. 

Isto vai evitar que você compre um DOS 
que não possa ser lido pelo seu drive. 

Com relação à compra aqui no Bra- 
sil, creio não ser muito fácil encontrá- 
los, mas com um pouco de esforço você 
poderá obter sucesso. De qualquer for- 
ma, você pode adquirilos em qualquer 
loja especializada nos EUA. E 





Engenheiro Naval, terminando Pós-Graduação 
na COPPE/UFRJ, João Henrique Volpini Mat- 
tos tem cursos de CP/M, Assembler e FOR- 
TRAN pela UFRJ, COBOL pela NUCEMPRO, 
conhece SPSS e trabalha há quatro anos com 
o BASIC (não exclusivamente). Possui um mi- 
crocomputador D-8000 compatível com o 
TRS-80 Modelo |, com placa de CP/M. Atual- 
mente é Assessor Técnico do Departamento 
de Informática do SENAC. 
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Veja o que você pode fazer no CP-500 com o DISKZAP do DOSPLUS: 
modificar o conteúdo de um disquete, personalizá-lo e, de quebra, criar monstrinhos! 





DISKZAP para mudar 


Roberto Quito de Sant'Anna 





tive oportunidade de trabalhar no CP-S00, o DOS- 
PLUS 3.4 é, na minha opinião, o mais versátil e o de 
maior compatibilidade com o DOS 500/TRSDOS. Embora o 
NEWDOS seja talvez mais poderoso, o DOSPLUS 3.4 constitui 
uma valiosa aquisição para todo proprietário de CP-S00, pois 
além dos utilitários normalmente encontrados em todos os 
DOS (BACKUP, FORMAT etc.), este sistema operacional dis- 
põe ainda do DISKZAP — poderosa ferramenta que permite o 
acesso, a visualização e até mesmo a modificação byte por byte 
de qualquer setor de um disco, independente de seu nível de 
proteção e de suas senhas. Com o DISKZAP é possível entrar 
em qualquer arquivo e modificá-lo com a maior facilidade, seja 
ele um programa em BASIC ou linguagem de máquina, um ar- 
quivo de dados ou até mesmo o próprio sistema operacional. 
Este artigo pretende dar informações a respeito da utiliza- 
ção desta ferramenta, concentrando-se no que o próprio Ma- 
nual do Usuário chama de coração do DISKZAP, que é a sua 
opção DISPLAY. Ao final, uma aplicação prática, através da 
qual será demonstrado como personalizar um disquete com o 
DOS 500, substituindo o logotipo da Prológica por um dese- 
nho de livre criação por parte do usuário, por suas iniciais em 
letras gigantes ou por qualquer texto desejado — tudo limita- 
do, para maior simplicidade, a oito linhas de tela. O simpático 
“monstrinho” que abre este artigo é o que aparece em todos os 
meus disquetes modificados (você verá como). 


D entre os vários sistemas operacionais com os quais já 
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E por falar em Manual do Usuário, desejo citar, de início, 
uma séria advertência contida nas explicações sobre o DISK- 
ZAP: Por ser um poderoso editor de setores de discos, sua 
utilização sem a devida cautela pode vir a inutilizar um arquivo 
ou até mesmo todo o conteúdo de um disco em fração de se- 
gundos. Assim, é importante usá-lo em uma cópia (backup) do 
disco que se quer modificar. O manual lembra, com muita 
propriedade, que é o usuário — e não o DISKZAP — quem inu- 
tiliza conteúdos de disquetes... 

Para trabalhar com o DISKZAP a primeira providência é, 
após inicializado o DOSPLUS 3.4, digitar DISKZAP < ENTER>; 
o que faz surgir a pergunta Number of Tracks? (Número de 
Trilhas?), a qual, para o DOS 500/TRSDOS, deve ser respondi- 
da digitando-se 40 < ENTER >; se você se distrair e não entrar 
com o número 40, basta teclar <BREAK >e a pergunta sur- 
girá novamente. Após corretamente respondida, é feita a lim- 
peza da tela e surge o seguinte MENU: 


Model III Diskzap utility - Ver 3.1 
Copyright (c) 1981, Micro-Systems Software 


* Mode 
Zero 


Copy 
Print 


Verify 
Format 
Display 


Com as setas para cima e para baixo desloque o asterisco 
até que ele aponte a opção desejada, a qual será ativada pres- 
sionando-se <ENTER >. Neste ponto, se você quiser voltar ao 
MENU, basta apertar < BREAK >. A tecla BREAK é a saída- 
padrão do DISKZAP e sua função é interromper qualquer ope- 
ração em andamento e retornar ao MENU. 

Como estamos interessados apenas na opção DISPLAY, des- 
loque o * para a última linha e aperte <ENTER >. Imediata- 
mente surgirão, uma a uma, as perguntas Drive?, Track? (Tri- 
lha?) e Sector?. Responda cada uma das perguntas com o va- 
lor hexadecimal correspondente seguido de <ENTER >e, em 
seguida, será mostrada uma tela como esta: 


000000: 284D 6F64 656C 2049 202D 204D 6F64 656C (Model 1 - Model 
000010: 2049 4949 292 2020 416C 736F 206D 616B III). Also mak 
000020: 6520 6365 7274 6169 6E20 7468 6174 2074 e certain that t 
000030: ... 


0000F0: 202E 2E2E 00A3 7028 003A 93FB 2020 2020 


A organização desta tela, que é a visualização de todo o se- 
tor especificado, é a seguinte: a primeira coluna é o endereço 
do setor mostrado — os dois primeiros dígitos representam a 
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(00 H), os dois seguintes o setor (00 H) e os dois últimos 
D H até FO H) o endereço hexadecimal do primeiro byte 
da linha; as próximas oito colunas são o conteúdo hexa- 
dos 16 bytes (cada coluna com 2 bytes ou 4 nibbles) 
da linha; finalmente, à direita de cada linha são mostrados 
6 caracteres ASCII correspondentes a cada um dos bytes 
ha, sendo que os caracteres sem correspondente ASCII 
Drtanto não imprimíveis) são representados por um ponto. 
16 bytes de cada linha são contados de O a F e, para sim- 
Car, a partir de agora passo a referenciar cada linha pelo va- 
exadecimal do endereço de seu primeiro byte. No exem- 
ma última linha cujo primeiro byte tem o endereço FO, o 
F6 contém o hexadecimal 70, que corresponde à letra p. 
encontra uma relação completa de todos os caracteres 
CHI e seus códigos decimais e hexadecimais correspondentes 
páginas 159/16] do Manual de Operação e Linguagem 
IC da Prológica. 
Apresentada a tela, você dispõe das opções: 
5— para mostrar O próximo setor; 
— para mostrar o setor anterior; 
— para mostrar o mesmo setor da próxima trilha; 
— para mostrar o mesmo setor na trilha anterior; 
— para entrar no modo de Modificação (MODIFY mode). 
fe O último setor de cada trilha e o primeiro da seguinte 
uma parada com a mensagem Record NOT FOUND Du- 
Read. Continue?. Responda Y <ENTER > e a exibição 
itinuará, ou responda N e retome ao MENU. 
No modo de Modificação (M) surge um cursor superposto 
caracteres hexadecimais do primeiro byte da primeira li- 
— ele pode ser movido ao longo dos 256 bytes de toda a 
por meio das quatro setas. Posicionado o cursor sobre o 
que se quer modificar, o teclado passa a aceitar apenas 
acteres hexadecimais válidos, os quais irão substituir os ca- 
Gteres da posição que se está modificando. Tão logo se intro- 
za o segundo caráter, o caráter ASCII correspondente ao 
ixadecimal recém-introduzido substitui o anterior na posi- 
D correspondente do campo ASCII à direita da linha e o cur- 
avança uma posição (CUIDADO: ao ultrapassar o último 
te de uma linha o cursor retoma ao primeiro byte da mesma 
à a passar à linha seguinte, somente usando a seta para 
ixo). 
Feitas todas as modificações, você pode apertar < ENTER > 
escrever o setor modificado no disco ou < BREAK > para 
jular todas as modificações, mantendo inalterado o setor no 
co. Em ambos os casos, o setor especificado continua sendo 
Dstrado, continuando válidas todas as opções (;, —, +, =, e 
) ou o < BREAK > para voltar ao MENU. 


AGORA, A CRIATIVIDADE 


Vista a teoria, passemos à prática. Para tanto, você deve 
ocurar se familiarizar com os já citados códigos das páginas 
59/161, com a tabela de conversão decimal-hexadecimal das 
ginas 166/167 e com a tabela de caracteres gráficos da pá- 
157. A propósito dos caracteres gráficos, convém lembrar 
cada posição da tela é constituída de seis blocos (pixels) 
cionados às potências de dois, da seguinte maneira: 


Assim, para chegar ao código do caráter desejado, basta adi- 
onar a 128 os valores correspondentes aos blocos que se quer 
tender. Por exemplo: 


aa Código 128 + 1 + 8 + 16 = 153 
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- linha: 160-164-164-164-164-164-164-164-164-164 
- linha:153-128-128-128-160-176-144-128-128-128 
- linha: 166-128-128-128-131-128-139-180-160-188 
* linha:153-128-128-128-128-128-160-186-135-171 


Figura 1 — Parte do “monstrinho” 


O próximo passo é tomar uma cópia do layout do formato 
de tela da página 158 ou uma folha de papel quadriculado — a 
única desvantagem desta é a perda de proporção do desenho, 
uma vez que os blocos da tela não são quadrados — e, lembran- 
do da nossa (para simplificar) limitação de oito linhas e que 
uma linha tem 64 caracteres... dê asas à sua veia artística! 
Uma vez pronto o desenho, centralize-o na tela, delimite as co- 
lunas e linhas ocupadas, conte os espaços necessários à esquer- 
da e, pacientemente, levante o código correspondente ao sím- 
bolo em cada posição. Por exemplo, o quadrante superior es- 





querdo de nossa ilustração (o “monstrinho”) ficaria do jeito que 


está na figura 1. 

Convertendo todos os valores correspondentes às quatro h- 
nhas deste mesmo quadrante para o sistema hexadecimal, com 
o auxílio da tabela das páginas 166/167, e aproveitando para 
substituir as ocorrências múltiplas do código 128 (espaço ou 
bloco vazio) pelo código de compressão de espaços apropriado 
(193 = 1 espaço, 194 = 2 espaços etc. — ver página 15 do ma- 
nual), teremos, finalmente: 


la. linha : AO-A4-A4-A4-A4-A4-A4-A4-A4-A4 
2a. linha : 99-C3-A0-B0-90-C3 

3a. linha : A6-C3-83-80-8B-B4-A0-BC 

4a. linha : 99-C5-A0-BA-87-AB 


Agora, ligue o seu micro, coloque um disquete com o 
DOSPLUS 3.4 no drive 0, outro com o DOS 500 no drive 1, 
aperte o botão RESET e, após carregado o sistema, tecle 
DISKZAP <ENTER > ; mova o*até a posição DISPLAY, te- 
cle novamente  <ENTER> e responda às perguntas com 40 
(Number of Tracks?), 1 (Drive?), O (Track?) e F (Sector?). 
Observe bem a tela que está sendo mostrada e identifique cada 
uma das 16 linhas e seus bytes, comparando, quando possível, 


os valores hexadecimais com a representação ASCII do lado ,, 


direito. ú 


37 


= 





DISKZAP PARA MUDAR 





Você verá à direita o logotipo da Prológica desmontado — 
note que ele começa na linha 30 e vai até a EO; note ainda, nas 
posições B4, BS, B6 e B7 da linha BO, os hexadecimais 01, 2C€, 
FO e 51, OS QUAIS NÃO PODEM SER APAGADOS OU 
MODIFICADOS, sob pena de o seu disco ir para o espaço. 
Feita esta inspeção, tecle M para entrar no modo de modifica- 
ção, movimente o cursor com o auxílio das setas e modifique 
sua tela conforme a figura 2, com muita atenção (para simpli- 
ficar, não mostramos a parte à direita do vídeo com os caracte- 
res ASCII). 














—————— 
000F30: OAD6 AOA4 A4A4 A4A4 A4A4 A4A4 A4A4 A4A4 
000F40: A4A4 A4A4 A4A4 OAD6 99C3 AOBO 90C7 BOBO 
000F50: C388 910A D6A6 C383 808B B4AO BCBC B4AO 
000F60: 9E81 8281 C2A2 840A D699 C5SAO BA87 ABBF | 
000F70: 83AF BOC5 8891 0AD6 A6C5S BEBF B2BA BFB2 
000F80: BABF 94C4 A284 0AD6 99C5 BBAF B4B3 B3B1 
000F90: BE8F 81C4 8891 OAD6 A6C5 8ASC 8E85 808F 
000FAO: BCBE C5SAZ 840A D689 9898 9898 9898 9898 
000FBO: 9898 9898 012C F051 9898 9898 9898 9881 
000FCO: 2020 2020 2020 2020 2020 2020 2020 2020 
000FDO: 2020 2020 2020 2020 2020 2020 2020 2020 
OO0FEO: 200D esposo cncrovorotad ese seco sas eds 

Figura 2 


Após terminar, confira cuidadosamente todas as a linhas, ve- 
nifique novamente os bytes B4, BS, B6 e B7 e aperte < ENTER 
para gravar o setor modificado no disco. Em seguida, coloque 
o disco com o DOS 500 modificado no drive O e aperte 
RESET. Se tudo foi feito corretamente, o monstrinho estará 
sorrindo para você... 

A única coisa que a esta altura pode lhe parecer misteriosa 
é o hexadecimal OA, que normalmente aparece seguido de D6 
(por exemplo, os bytes 30 e 31 da linha 30 e AS e A6 da linha 
AO). O código OA, conforme pode ser visto na página 159 do 
manual, significa “Move o cursor para o começo da próxima 
linha e apaga a linha”, enquanto que o D6 (decimal 214) re- 
presenta a compressão de 22 espaços para centralizar a figura 
na tela. Creio que isto é suficiente e que, seguindo os passos 
apresentados, você já pode partir para o seu próprio desenho. 

Uma palavra final: a maior parte do que foi aqui explicado, 
principalmente a modificação do setor F da trilha O do DOS 
500, se aplica, integralmente, ao equivalente do NEWDOS cha- 
mado SUPERZAP e que é, na realidade, muito mais poderoso 
do que o DISKZAP. A preferência pelo DISKZAP fundamen- 
ta-se na sua maior simplicidade de utilização para o fim pro- 
posto, e no fato de que o SUPERZAP não permite a visualiza- 
ção dos caracteres gráficos, no campo ASCII, à direita de cada 


ç = 
linha E 





Roberto Quito de Sant'Anna é Engenheiro de Telecomunicações, for- 
mado pelo Instituto Militar de Engenharia. Professor da cadeira de In- 
formática da Academia Militar das Agulhas Negras, desde agosto de 
1982 é também colaborador da MICRO-MAX! Computadores e Siste- 
mas, como Analista de Sistemas. 





A maneira prática de are revisar aoperação de 


planejar, acompanh 
sua empresa é através do uso do BUSINESS-CALC. . 
e aÃ via ra td rs id 


O que é o BUSINESS-CALC? É um produto composto de um soft- 
ware e uma documentação. 


SOFTWARE: Matriz eletrônica de 254 linhas e 78 colunas progra- 
máveis diretamente pelo usuário, MATRIZ BUSINESS-CALC. 


REQUISITOS DO COMPUTADOR 
Memória minima: 32K 


cms cu 


Ssuua ses 


AV. RIO BRANCO, 45/811 - RIO DE JANEIRO - 20090 
TEL.: 283-1814 


computel - computel - computel -computel - computel - computel - computel 
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Os principais centros comerciais 
do mundo têm como sua empresa oficial 
de exportações os Trade Centers. Dentro 
dessa nova filosofia do comércio inter- 
nacional, um grupo de empresários cons- 
tituiu q BRASIL TRADE CENTER, 
COMERCIO E PARTICIPAÇÕES, 
baseado na estrutura dos seus similares 
dos grandes centros, à qual se acrescen- 
tou a dinâmica do Banque D'Affaire 
francês. A idéia principal desse Banco de 
Negócios, é, no exterior, vender Brasil 
e, dentro do País, fomentar o intercâmbio 
com o mercado internacional e oferecer 
uma série de produtos e facilidades ao 
empresário e outras pessoas interessadas. 
Veja alguns exemplos: 


Rhoil 
ENTER 


O Banco de negócios. 


BRASILTRADE CENTER 


Av. Epitácio Pessoa, 280 (esquina de Visconde 
de Pirajá), Ipanema, Rio de Janeiro - RJ, 
CEP 224771, tels.: (021) 259-1299, 2591499 e 2591542. 




















A BTC - Computadores e Vídeo 
desenvolve e fornece programas 
aplicativos, cursos de BASIC (básico 
e avançado), entre outros, além de uma 
completa assessoria em Informática e da 
ai de máquinas, software e vídeo, 





comercializa aparelhos de vídeo-cassete, 
fitas, e i atualmente o primeiro curso 
de Inglês em vídeo-cassete produzido no 
Brasil, com um aprendizado divertido 
e eficiente. Também 
encontram-se 
em desenvol- 
vimento diver- 
sos projetos de 
programas cultu- 
rais em vídeo. 







A BTC - Viagens e Turismo 
promove viagens comerciais e 
turísticas, individuais e em pacotes, 
com toda a infra-estrutura dos maiores 
agentes de viagens (despachantes, 
passagens aéreas, traslados, tours, 
hospedagem, etc.), incrementando o 
turismo interno e o intercâmbio com 
investidores estrangeiros. Realiza, 
também, tours de ensino 
e desenvolvimento em- 

presarial para 

estudantes e 
empresários, visitan- 
do os maiores centros de In- 
formática (fábricas e empresas, entre 
outros) dos Estados Unidos e Japão. 


BTC - Inc. Empresa Promoção e 
Comercialização em Miami - 
Flórida - EUA. O BRASIL TRADE 
CENTER funciona com telex interna- 
cional, banco de dados e recepcionistas 
bilingúes, com escritórios em Miami 
e no Rio de Janeiro, este localizado 
numa das mais valorizadas esquinas 
do Brasil e dotado de show-room para 
exposição e lançamentos de produtos. 
Visite-nos. Estamos à sua disposição. 


repro 








Inicialize-se no Sistema Operacional dos equipamentos compatíveis com 
o ZX81 e conheça a “alma” do seu equipamento. 





O Sistema Operacional 


cionais, assemblers etc. e sem- 
pre fica uma pergunta no ar: “Mas afinal 
o que eu, um simples usuário que não 
pretende ser o mestre dos mestres, nem 
escrever a oitava maravilha do mundo 
em matéria de programas, tenho a ver 
com tudo isso?” A resposta a essa per- 
gunta parece ser muto simples, e é 
mesmo: não tem nada. 

” Mas, se O que se procura é a compre- 
ensão e a integração entre o usuário e o 
computador; se a pretensão é estabele- 
cer um “diálogo franco” com a máquina 
e ainda se quer que o computador não 
fique desligado, encostado num canto 
qualquer, por medo do que possa acon- 
tecer quando a tela do vídeo começar a 
funcionar, então só há um caminho: co- 
nhecer e entender o Sistema Operacio- 
nal do mucro que estivermos utilizando, 
sem preconceito de cor, raça, religião, 
classe ou fabricante. 

Isto porque o Sistema Operacional é 
virtualmente a alma do computador 
(materialmente traduzida na forma de 
um programa Assembler), e um equipa- 
mento sem ele é o mesmo que um ser 
humano sem personalidade; sem passa- 
do, presente e futuro; sem realidade e 
sem experiência de vida. O computador 
sem o Sistema Operacional é apenas um 
amontoado de componentes eletrônicos 
sem utilidade alguma. 


uto se tem falado e escnto so- 
bre monitores, sistemas opera- 


40 


do ZX81 (1) 


Renato Degiovani 


O NASCIMENTO 

Imaginemos que o micro está desh- 
gado. Tudo nele é estático: as resistências, 
os capacitores, o clock, enfim tudo como 
uma grande cidade antes do nascer do 
dia: sem movimento, sem barulho e sem 
vida. O Sistema Operacional também es- 
tá lá, posicionado na ROM e pronto pa- 
ra “nascer” ao simples toque humano. 
No momento em que o interruptor da 
corrente elétrica é acionado, tem início 
um frenético movimento de eletrons por 
toda a máquina. O nosso Sistema Opera- 
cional, então, é “convocado” a partici- 
par desse processo e sua primeira instru- 
ção é executada: a instrução cujo ende- 
reço é zero. 

Antes de prosseguirmos, é preciso re- 
lembrar algumas coisas a respeito da 
UCP. A Z80A, que é o coração do com- 
putador, batendo numa frequência de 
aproximadamente 4 MHz, pode endere- 
çar 65536 bytes, ou seja, a UCP só pode 


manipular 64 K de memónia, seja ela 
RAM, ROM, PROM ou EPROM. Isso é 
feito na forma de endereços (de O a 
65535) e cada um desses endereços con- 
tém um byte que será manipulado como 
instrução Assembler; como dado de lei- 
tura; como elemento de um programa 
em BASIC; ou como resultado de ope- 
rações matemáticas ou lógicas. Tudo 
1sso na cadência do clock de 4 MHz, isto 
é: tuque-pega um byte no endereço X; 
taque-soma com o valor Y; tique-colo- 
ca o resultado no endereço Z.; taque... 

Voltando ao Sistema Operacional, 
a primeira instrução que é executada 
tem o endereço zero e faz parte da im- 
cialização do sistema. O processo todo é 
representado desta forma na figura 1. 

A primeira instrução (D3 FD) não 
tem muita importância a nível de pro- 
gramação do usuário. Mas a segunda ins- 
trução Assembler executada é de sigmfi- 
cado fundamental para o equipamento: 
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grava o registrador BC com o supos- 
ndereço mais alto da memória. 
importante lembrar que o projeto 
Sistema Operacional da Sinclair — 
jo para os TKs, CPs e NEs — parte 
pressuposto que haverá, no máximo, 
expansão de memória de 16 K. 
im, O maior endereço seria 7FFF 
32767 em decimal). Dessa forma, se 
conectada ao equipamento uma 
intidade maior de memória, o Siste- 
Operacional simplesmente ignorará o 
pedente e o equipamento operará 
O se tivesse apenas 16K. É preciso 
altar também que a capacidade total 
endereçamento da Z80 é de 64 K e 
desse total devem ser descontados 
8 K do Sistema Operacional e mais 8 
reservados para implementações. Na 
idade, o usuário terá acesso a, no 
imo, 48 K bytes de memória RAM. 
Para se certificar sobre como está 
rando o seu equipamento, digite 
INT PEEK 3+256*PEEK 4 e compa- 
o resultado com 65535. Isso mostrará 
aonde seu equipamento poderá ope- 
normalmente a memória RAM. 

A terceira instrução é um JUMP que 
uivale ao GOTO do BASIC. Assim, a 
fecução é desviada para o endereço 
SCB (971 em decimal). 


INICIALIZANDO 


Uma análise atenta da rotina de ini- 
Balização (veja a figura 1) vai nos mos- 
que o sistema usa uma lógica bas- 
te simples para determinar os seus 
tes. Na realidade, o que acontece 
O passa de uma contagem, onde o sis- 
ima parte de um determinado endereço 
(32767) e, gravando em cada byte 
valor 2, vai decrementando os endere- 
Ds até 16383, que é o último byte antes 
começar a RAM. A partir daí o siste- 
na volta hmpando os bytes (gravando 
ro) e contando quantos deles pos- 
fam o valor 2. E quando encontra o 
eiro byte que não tem valor 2, en- 
bontra o final da RAM e, portanto, a 
antidade de bytes disponíveis ao 
suário. 
Simples e infantil. Mas não devemos 
isquecer que a “criança” ainda está nas- 
tendo, e essa foi a sua primeira ação: 
gonhecer os limutes da RAM para que 
Dodo o sistema seja organizado em fun- 
ção disso. A partir desse ponto a rotina 
pontinua operando e irá determinar as 
putras variáveis do sistema. 
Aqui é importante uma pausa: para 
facilitar a compreensão deste assunto 
necessário recorrermos ao manual do 
quipamento, em especial aos capítulos 
, 26, 27, 28 e o apêndice A do TK 
no CP-200 é o capítulo “Como funcio- 
ha o CP-200 por dentro” e o apêndice 
. Se houver alguma dificuldade com os 
números hexadecimais, basta transfor- 
á-los em decimais que o resultado será 
O mesmo. 
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BEBEEZE 
ARLSERÉ 
>» E 


cr 
JR 


RsnsasRESA 
dogegsBER>Ê 
ESRCE aa EI 


Es 
se 
E 


... 


Figura 2 


Prosseguindo, há vários modos de se 
executar a imcialização do sistema. O 
primeiro e mais óbvio é desligando e re- 
ligando o equipamento, se bem que essa 
não é uma boa política porque implica 
num corte brusco da corrente elétrica, 
prejudicando, a longo prazo, o funciona- 
mento de certos componentes eletrôm- 
cos. 
Através do BASIC do micro é possí- 
vel imcializar o Sistema Operacional 
procedendo a uma chamada, em lingua- 
gem de máquina, para o endereço 0. 
Assim, RAND USR O equivale a colocar 
o micro no estado inicial de operação. 
Em linguagem de máquina, qualquer 
desvio, relativo ou não, ou chamada de 
sub-rotina, ou ainda a instrução RST 0, 
podem ser utilizados. 

Existe também no BASIC o comando 
NEW que limpa toda a memória do mi- 
cro. Quando o Sistema Operacional exe- 
cuta esse comando (ou como instrução 
numa linha de programa em BASIC) ele 
faz um desvio para o endereço 03C3 
(963 em decimal). Nesse ponto o siste- 
ma grava no registrador BC a variável 
RAMTOP, ou seja, o último byte da 
RAM e procede como se fosse a iniciali- 
zação. 

A diferença é que se alterarmos o va- 
lor de RAMTOP (16388 e 16389) todos 
os bytes que estiverem após o endereço 
de RAMTOP não serão zerados pelo 
NEW, daí a afirmação de que eles estão 
protegidos no topo da memória. O co- 
mando NEW também pode ser chamado 
como rotina em Assembler por RAND 
USR 963 ou em linguagem de máquina 
por qualquer chamada ou desvio. 

A parte de imcialização do sistema 
não compreende apenas a contagem dos 
bytes e a determinação do limite da 
memória. Todas as outras variáveis do 
sistema terão seus parâmetros estabeleci- 
dos pela rotina de inicialização. Após o 
sistema definir todas as variáveis, ele 








passa a executar a rotina principal do 
display em modo de edição. E é exata- 
mente sobre isto que iremos tratar no 


próximo número. = 
E3 


Renato Degiovani é formado em Comunica- 
ção Visual e Desenho Industrial pela Pontifi- 
cia Universidade Católica do Rio de Janeiro. 
Há mais de um ano utiliza microcomputado- 
res para cálculos na área em que atua. 





EM PD, TUDO 
O QUE VOCÊ 
NECESSITA NUM 
SÓ FORNECEDOR! 


Ea Supply não tem apenas todo e qualquer ti- 
po de material para CPD's. Tem também os 
melhores preços e a mais rápida entrega. Isso 
porque a Supply tem um estoque completo das 
melhores marcas existentes no mercado, po- 
dendo assim atender — com a mesma eficiên- 





consulte antes a Supply. 
Você fará bons negócios e bons amigos. 


eRoSUIPPL 


Suprimentos e Equipamentos para Proces- 
samento de Dados Ltda. 

Rua Padre Leandro, 70 — Fonseca 

CEP 24120 — Tel.: 722-7937 Niterói — RJ. 





OUTROS ESTADOS: 

Pernambuco, Rio Grande do Norte e Parai- 
ba: Filial Recife: (081) 431-0569 — Alagoas: 
CORTEC: (082) 221-5421 — Ceará: DATA- 
PRINT:(085) 226-9328 — Mato Grosso: FOR- 
TALEZA: (067) 382-0173 

















Acompanhe a evolução de qualquer evento através de gráficos em seu micro 
da linha TRS-80 Modelos | ou !!l e decida com mais segurança 





Gráficos em barras e linhas 


s gráficos são de grande utili- 

dade quando se trata de acom- 

panhar a evolução ao longo do 
tempo de uma atividade qualquer. Grá- 
ficos em barras ou em linhas permitem 
a visualização rápida do desenvolvimen- 
to da atividade que se quer controlar, 
seja ela de vendas de produtos, evolução 
de lucros, custos ou despesas etc. E com 
isto, podem ser introduzidas mudanças 
na estratégia envolvida para manter ou 
reverter as situações mostradas nos grá- 
ficos. 

Em geral os gráficos acompanham 
eventos segundo períodos de tempo tais 
como semanas, meses e anos. Quaisquer 
períodos intermediários de tempo tam- 
bém podem ser usados, porém os mais 
usados são os citados. Estes intervalos 
são normalmente colocados segundo a 
coordenada do eixo X; no eixo Y são 
colocados valores que expressam quan- 
tias em dinheiro, números percentuais 
etc. 

Este programa foi desenvolvido no 
CP-500 e, consequentemente, roda em 
equipamentos da família TRS-80 Mode- 
los 1 e III: D-8000/1/2, DGT-100, CP- 
300, Naja, JR Sysdata e JP-O1. Ele foi 
criado com o objetivo de permitir uma 
grande flexibilidade, tanto no sentido de 
plotar valores em barras, curvas (ou am- 
bos), bem como quanto às variações nos 
dois eixos. No eixo X podem ser coloca- 
dos períodos de tempo como meses, 
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semanas ou dias, os quais são oferecidos 
em menu, ou então o próprio usuário 
poderá teclar o índice que desejar para 
ser colocado neste eixo. No eixo Y, va- 
lores de O a 10 até O a 100.000 podem 
ser colocados diretamente; valores maio- 
res também podem ser usados, bastando 
para isso colocar um multiplicador no 
eixo: X10, X100 etc. 


A ESTRUTURA DO PROGRAMA 


O programa se divide em quatro par- 
tes: abertura, entrada de dados, proces- 
samento e saída de dados (no vídeo, em 
forma de gráfico). As instruções, cons- 
tantes no próprio programa, ajudam o 
usuário a se familiarizar com o mesmo. 
Elas podem ser saltadas, se já tiverem si- 
do memorizadas. 

As entradas de dados pelo teclado 
são usuais. O menu do programa oferece 
índices padronizados, os quais podem 
ser escolhidos para serem colocados sob 
o eixo X; neste caso, o título do gráfico 
é colocado automaticamente. Quando 
for preciso entrar com índices próprios 
de X (ao surgir na tela TECLE OS INDI 
CES DESEJADOS), torna-se necessário 
contar cuidadosamente os espaços para 
que a formatação das barras caia exata- 
mente sob os índices. 

Quando o programa pedir ENTRE 
COM O INDICE DE Y, pode-se entrar 
com valores multiplicadores de escala, 


tais como X10, X100 etc, como já foi 
dito. A unidade em Y é o valor máximo 
da escala: 10 (de O a 10), 100 (de O a 
100) etc. Este eixo é variável, isto é, é 
colocado em margem variável que acom- 
panha os números colocados à esquerda 
do eixo. 

É importante fazer com que o nú- 
mero de valores introduzidos coincida 
com o número de barras ou pontos de 
inflexão da curva (em gráfico de linha). 

As distâncias entre as barras também 
são variáveis em função do número de 
valores introduzidos, ou seja, quanto 
maior o número de barras (o limite é 
12), menor o espaço entre elas. Isto per- 
mite um melhor aproveitamento visual 
do gráfico, evitando dispersão ou 
acúmulos. 

O programa foi estruturado de modo 
a orientar todos os passos necessários. 
Algumas correções são feitas pelo pró- 
prio programa, automaticamente, como 
quando se introduz, por erro, valores 
superiores ao da escala máxima. Neste 
caso, o número é dividido por dez, o 
que, se em alguns casos não provoca 
diferença significativa, em outros poderá 
acarretar o reinício do programa. 


Luiz Gonzaga de Alvarenga é Técnico de Tele- 
comunicações e trabalha na Embratel, em 
Goiânia, onde reside. 
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Gráficos em Barras e Linhas 


"AUTOR: LUIZ GONZAGA DE ALVARENGA - MAIO DE 1983. 

GoToOsSo 

PRINT9OS000,“<XENTER)”; 3FORT=1TOPO:NEXTEIPRINTOLOOS ,” 

=1 TO30:NEXT 

AB=INKEY$S: IFAS="“THENI0ELSECLS: RETURN 
CLS:CLEARÍDOSDIML(13),EE(13),Z(13),ZA(13), YC1I)FAA=Í0:BB=B: 


CLS 
AS=“BARGRAPH” 
B$="“LINEGRAPH” 
ASLENCAS) 
B=LEN(BS) 
FORN=1TOA 
PRINTCHR$(23) 
IFP=OTHENÍADELSELSO 
P=12PRINTOA4ZO, STRINGSCA+2, 42) 
PRINTO4ZO, “K“LEFTS(AS,N)“k“3FORI=1TO30:NEXTIZNEXTN 
FORI=1TOJ00:NEXTECLS 
FORM=1TOB 
PRINTCHR$(23) 
IFV=OTHEN200ELSE210 
V=í :PRINTO46B, STRINGS (B+2, 42) 
PRINTOAGB, “X/LEFTSC(BS,M) “x: FORI=1 TO30:NEXTENEXTM 
FORI=1TO300:NEXT 
PRINTOS6B, “POR” 
PRINTOSAO, “LUIZ GONZAGA DE ALVARENGA” 
FORI=1 TOL500:NEXT 
à NPUT“QUER INSTRUCOES (S/N)”; 05: IFQ$="5"THENGOSUB720 
RINT“QUER GRAFICO DE BARRAS (1) DE LINHAS <2) OU AMBO 
“2 INPUTPK 
280 IFPK(1ORPK)3THEN270 
290 CLS:PRINTYSE QUISER USAR INDICES PADROES, TECLE (9), SE NA 
O, CENTER)” 
300 YUS=INKEYS: LFYUS="“THENSODELSE IF YUS=CHRS (64) THENGOTO1140 
340 CLS:PRINT/TECLE OS INDICES-DESEJADOS (SO CARACTERES NO MAX 
1M0)* 
320 LINEINPUTYS 
330 CLS:PRINT“ENTRE COM TITULO DO GRAFICO”: INPUTIS 
340 CLS:INPUT“ENTRE COM INDICE DE Y“;TS 
350 CLS:PRINT“ENTRE COM A UNIDADE DESEJADA EM Y (MAXIMO DE 100 
000)“: INPUTT 
360 1IFT>100000THEN350 
370 CLS 
380 INPUT“QUANTOS NUMEROS ENTRARAO PARA AS BARRAS (MAXIMO DE 1 
2)“; 
390 IFL)42THENCLS:G0TO3B0 
400 FORJJ=ÍTOL 
410 INPUTZCJJ) 
LFZ(JJ))TTHENZ( JN) =Z2( 997/10 
ZACIDSINTCZCIND IL) 
NEXT 
1FT=100000THENHL=1 :G0T0520 
IFT<=100THENPP=1 
CLS:FORX=0TOL20:SET(X, 43) ENEXTEIFPPC> 4 THENSOO 
FORY=0TO46:SET(4O,Y):NEXT 
FORY=1TO43STEPIESET(9, Y) ENEXTELFPP=1THENS4O 
FORY=0TO46:SET(14,Y) NEXT 
FORY=1TO43STEP32SET(13,Y)ENEXTELFT=10000RT=10000THENS40 
CLS2FORX=0TO420:SET(X,43) NEXTEFORY=0TO46:SET( 16, Y) NEXT 
FORY=1TO43STEP3:SET(4S,Y) NEXT 
PRINTO2S, IS; 
PRINTO6A, TS; 
PRINTO96P, YS; 
P=T7/10 
FORU=256TOBP6STEP64:PRINTOU, INTCT);3T=T-PENEXT 
x=21 4 
IFPK=2THENGOTO970 
FORJJ=ÍTOL 
EECJJ)=(4I-ZA(IID) 
YCJI)=EECJI) 
YCJIHL)=ZEEC IH) 
FORY=43TOEE(JJ)STEP-Í 
SET(X,Y) 
NEXTY 
IFL)7ANDL(=10THENX=X+AMELSEILFL )ZANDL(=12THENX=X+BBELSEIFL( 
=7ANDL ) ATHENX=X+CCELSEIFL(=4THENX=X+DD 
690 NEXTJJ 
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Lompbe 


Rua Gregorio Paes de 
Vila Ida - 


dá 


ASSESSORIA E TREINAMENTO EM 
MICRO-COMPUTADORES 8/C LTDA. 


Trabalhos em Gráficos para 
Apresentações - Transparências 


Hewlett - Packard 85-A 
Apple II 
Microdigital TK-85 


2 a 3 Alunos por Equipamento 
Cursos Fechados para 
Colégios e Empresas 


Almeida, 62 
Pinheiros - São Paulo 


Telefone: 65-9857 


P Peça na Loja de sua 
preferência nossos novos 
lançamentos para Unitron, 
Maxxi, Microengenho e 
Similares. 


DOMUS 


Programas de uso doméstico contendo : 


Agenda; Orçamento; Conta Corrente e 
Lista de Compras para Supermercado 


CONTROLLER 


Programas de uso Administrativo contendo: 
Cadastro de Clientes; Cadastro de 
Formecedores; Movimento de Títulos; 
Contas a Pagar e Contas a Receber 


PROGRAMMER 


Programas de uso Profissionais contendo: 
SDUMP - Editor de Arquivos, Lista seu 
- Arquivo texto na Impressora ou 

monitor 


SLIST - Documenta e Organiza seus 
Programas 

SCROSS - Pesquisa e Relaciona Variáveis 
com Linha de Programa e exibe 
no Monitor ou Impressora 


sárTwaRE so! 
Sempre um bom Programa 


SD! - INFORMÁTICA LTDA. 
Av. Brig. Faria Lima, 1853 - 50 Andar 
Telefone: 813-4031 — São Paulo 





A Rua Alvaro Alvim. 37 - 2º andar - Fone 2256013 
(Centro) Rio de Janeiro (em frente à estação 
Metro Cinelândia - 2.+ a 6.º das 16.00 

as 2200 hs. Sabado das 8.00 as 17:00 hs dé 


— Cursos de programação 
APOSTILA PRÓPRIA e AU- 
LAS PRÁTICAS em diversos 
MICROCOMPUTADORES 

— Todas as principais marcas 
de MICROCOMPUTADORES 
pelo menor preço com crédi- 
to direto em até 24 MESES 

— Programas prontos ou por 
encomendas tanto de jogos 
quanto comerciais 

MICROCENTER INFORMÁTICA LTDA. 

Rua Conde de Bonfim, 229 - Lojas 320 e 

312 — Galeria Cinema III - Tel.: 228-0593 

- Cep 20520 - Tijuca - Rio de Janeiro - RJ 





GRÁFICOS EM BARRAS E LINHAS 













700 IFPK=3THENGOTOLO2ZO 
7140 G0T0710 

720 CLS:PRINT92S,“ INSTRUCOES” ; 

730 PRINT:PRINT 

740 PRINT”O grafico em barras pode ser usado com varios tipos 
de unidades” 

750 PRINT“ou indices nas cordenadas X/Y, tais comos” 

760 PRINT 

770 PRINT” Anos: 1980 1981 1982 etc;” 

780 PRINT” Meses: JAN FEV MAR etc;” 

790 PRINT” Dias: DOMINGO SEGUNDA TERCA etc;” 

800 PRINT 

840 PRINT“num total de 50 caracteres para os indices, ou podem 
ser usados” 

820 PRINT“OS indices padroes oferecidos no menu.” 

830 PRINT“Estes indices ficarao sob a coordenada X do graficos 
Na coorde “ 

840 PRINT“nada Y poderao estar unidades no valor maximo que se 
escolher. “ 

850 PRINT”“O incremento pode ser feito por um, por dez, por cem 
por vis, * 

860 GOSUB30 

870 PRINT“ou por dez mil diretamente, e indiretamente, pelo mu 
Itiplicador” 

880 PRINT“que se colocar no indice da coordenada Y: X1, X10, X 
100, etc.” 

B90 PRINT 

700 PRINT“O grafico de linhas e” identico quanto 'as entradas 
de unidades” 

710 PRINT“E indices. Pode-se escolher o grafico de barras, de” 
linhas, ou “ 

720 PRINT“podem ser plotados ambos, barras e linhas, se assim 
se desejar.” 

730 PRINT 

740 PRINT“Qualquer erro de digitacao pode ser corrigido sem qu 
alquer” 

950 PRINT“prejuizo, durante a propria teclagem.” 

760 GOSUB30:RETURN 

970 FORPO=1TOL 

780 EE(PO)=(43-ZA(PO)) 

990 Y(PO)=EE(PO) 

1000 Y(PO+1)=EE(PO+1) 

1010 NEXT 

1020 X=212FORRT=1TOL-1 

1030 IFL)7ANDL(=1DTHENP=AA:G0T01070 

1040 IFL>7ANDL<=12THENP=BB 

1050 IFL(<=7ANDL)>4THENP=CC 

1060 IFL(<=4THENP=DD 

1070 FORJK=0TOP 

1080 SET(X+(JK-L), YCRTD+ACIK-L)KCYCRTHLD=YCRT)D/P) 

1090 NEXTJK 

1100 X=x+P 

1410 F=F+1:IFF=LTHENS130 

1120 NEXTRT 

1130 G0T01130 

1140 CLS:PRINT“ESCOLHA O INDICE DESEJADO:” 

14150 PRINT 

1160 PRINT“L) “;2GH$="JAN FEV MAR ABR MAI JUN JUL AGO SET OUT 
NOV DEZ“ :PRINTGHS;:PRINT” CANUAL 

1170 PRINT 





















































1180 PRINT“2) “;2FH$=" D s T q q 
8 S“3PRINTFHS; PRINT” (SEMANAL) 

1190 PRINT 

1200 PRINT“3) “;zJHS=" 1 5 10 15 20 
es 30“3PRINTJHS;ZPRINT” MENSAL)” 

1240 PRINT 


1220 PRINT“ESCOLHA <1), <2) OU <3)“zINPUTTT 

1230 IFTT<LORTT)3THENGOTO1L140 

1240 IFTT=1 THENYS$=GHSELSEIFTT=2THENYS=FHSELSEIFTT=3THENYS=JHS 
1250 HY$="GRAFICO ANUAL” 

1260 UY$S="GRAFICO SEMANAL” 

1270 IY$="GRAFICO MENSAL” 

1280 IFTT=1THENIS=HYSELSEIFTT=2THENIS=UYSELSEIFTT=3THENIS=IYS 
1290 CLS:G0T0340 
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& filcre 


NOVIDADES 


CP-300/CP-500 
JOGOS 
BATALHA 


FORCA (F) 
TIRO AO ALVO 
TABUADA (F) 4.000* 
COMANDO UFO 


6.000* 
5.500* 


PATRULHA (F).. 
INVASORES (F) . 
PADDLE PINBALL 


DISCOS VOADO- 
RES (F) 
DANCING 
MON (F) 
XADREZ (F)... 
CUBO (F) 
JORNADA NAS 
ESTRELAS (F) .. 
ELIZA (F) 7.000* 
COSMIC (F) .... 9.600* 
SCARFMAN (F) . 9.600* 
LUNAR (F) 9.600* 
BARRICADA (F) . 9.600” 
GALAXI(F) .... 9.600* 
METEOR (F).... 9.600* 
PENETRAITOR(F) 9.600* 
10 JOGOS EM BA- 
SIC (em disco, boa, 
sky, pouso lunar, 
jornada, teaser, cu- 
pim,hopper, cram, 
fireman, space fire. 
APLICATIVO 

- CADASTRO DE 

CLIENTES (F) 15 ORTN 

20 ORTN 

- MALA DIRETA 

(D) Ê 
- FINANÇAS (D) . 30.000 
- PROCALC (D) .. 40.000 


- 10,000* 


9.500* 


24.000 


SOFTWARE 


- DIRETÓRIO (D) 
- BANCO DE DA- 
DOS (D) 
- CARTA ASTRAL 


16.000 


- ODONTO (F) .30ORTN 

(9) 50 ORTN 
- CONVERT (F).. 6.400 
- LISTA (D) 16.000 
- SUPERTECLA 


32.000 
6.400* 


- EDITOR (D) ... 

- SOUND (F).... 

LEGENDA 

F - Para programa em fita 

D - Para programa em disco 

* Acrescentar Cr$ 6.000,00 
p/versão em disco 


COMPLETA LINHA DE 
PROGRAMAS PARA 
ENGENHARIA. 


VIGAS CONTI- 


PÓRTICOS 

TRELICA 

VIGA SOBRE BASE 
ELÁSTICA 

OPERAÇÕES COM 
MATRIZES 

RESOLUÇ. EQUA- 

ÇÃO DE GRAU 0. . 14.000 
CALC. ELEMENT. 

DO TRIÂNGULO . . 14.000 
CONVERSÃO DE 
UNIDADES 

DIMENS. 

CONCR. ARMADO 14.000 
VIGAS CURVAS . . 14.000 





PREÇO ESPECIAL - 
POR ATACADO 


CP-200 


AGENDA ; 
BATALHA AÉREA . 4.000 
BATALHA NAVAL .. 5.500 
BIORRITMO 

CAD. DE CLIENTES13.500 
COMANDO UFO .. 4.000 
CONTAS A PAGAR 13.000 


OESTE SELVAGEM 4.500 


SIMULADOR DE 


TABUADA 

TIRO AO ALVO .. 
VÍDEO TITULO. . .15.000 
VU-CALC ... - 10.000 
PACOTE ECONÔ- 

MICO - 4.000 
METEOR 5.200 
INVASION FORCE 9.600 
3D DEFENDER... 7.200 
KRAZY KONG ... 9.600 
RED ALERT 7.200 
PUC MAN 9.600 
INTELECTO 1.... 7.200 
jo jpicia | 5.000 
POUSO EM MARTE 5.000 
ALBATROZ 5.500 
ALERTA VERME- 

5.500 
9.000 
5.000 


MAZOGS 


DE MGM ssa por 
COMANDO  SUB- 
MARINO 

BASE ALPHA .... 


s MESAS “ARQUIVOS e FORMULÁRIOS e MICROS e IMPRESSORAS e DISQUETE e MESAS e ACESSÓRIOS e 


CORRIDA C/0BS- 
TÁCULOS 
AMBASSADOR . .. .4.500 
BATALHA NAVAL 


COLECIONADOR 
DE CRISTAIS ..... 
PERIGO, SERPEN- 
MED san 


LABIRINTO 
ROLETA 
BRANCO NO PRE- 


ARTILHARIA... 
SIMULADOR DE 


METEORO 

MN Ten o Te) 
FUNGALOIDES 
SIMULADOR DE 
vÔo Ill 
BLOQUEIO 

SUPER STANDART 


GUERRA DOS MIS- 


JORNADA NAS ES- 
TRELAS 

COME A COBRA .. 5.500 
EDITOR DE TEXTO12.000 


COMPILADOR AS- 
SEMBLER 
DESASSEMBLA- 


DESCHAVEADOR . 10.000 
CONTROLE BAN- 


SOUNDMAKER I.. 
GRAPHMAKER I.. 
FROGGER 


DISTRIBUIDOR EXCLUSIVO 
md 


FE VANRIO NS O MH 


SIVE AOS SÁBADOS ATÉ AS 13 HORAS PARA MELHOR ATEND 
(ACEITAMOS REPRESENTANTES) 


Filcres Importação e Representações Ltda. 
Rua Aurora, 165 — CEP 01209 — São Paulo — SP 


e 
Telex 1131298 FILG BR — PBX 223-7388 — Ramais 2, 4, 

Í C 12, 18, 19 — Diretos: 223-1446, 222-3458, 220-5794 e 
220-9113 — Reembolso — Ramal 17 Direto: 222-0016 — 220-7718 


SVSIW e SOIHQSSIIV * SVSIMW e ILINDSIA * SVHOSSIHdINI * SOHDIIA * SOLHYINNHOS * SOAINDHV 


- VIDEO (F) .... 10.000* 
- BANNER (F)... 6.400* 
SCRIP (D) 





- CONTROLE DE 


AÇÕES (F) ... .. 6.400* 


e SVHOSSIHdINI é SOHIIM e SOIHYINNWHOS e SOAINDOHV e SOIHOSSIIV * ILINOSIA * SVHOSSIHdIAI é SOHIIA e SOIHYINNHOS* SOAINDOHYV 


e ARQUIVOS «e FORMULARIOS e MICR 











Nesses tempos difíceis, economize memória em certas operações 
com este Monitor BASIC para os compatíveis com o ZX81. 








Monitor BASIC 


rogramar um microcomputador 

da classe dos CPs, NEs, ZXs e 

TKs é, sem dúvida nenhuma, 

um exercício de paciência e perseveran- 

ça, principalmente na fase de depuração 

dos"programas. Certas operações, como 

edição, gravação e eliminação de linhas, 

podem, às vezes, exigir bastante tempo e 

calma, devido às características do siste- 
ma operacional desses micros. 

Na realidade, todo usuário que dedi- 
ca um tempo maior a esses equipamen- 
tos, além do gasto com jogos e passa- 
tempos, acaba sentindo a falta de uma 
ferramenta que o auxilie na elaboração 
e estruturação dos seus programas. 

O Monitor BASIC é um programa 
que pretende facilitar algumas tarefas do 
programador, sem que isso signifique 
um grande gasto de memória. Na verda- 
de, foram gastos apenas 2K bytes de me- 
mória para o programa e, desses bytes, 
apenas 1,3K foram realmente ocupados, 
restando ainda espaço para futuras im- 
plementações. 

Algumas rotinas que compõem o 
Monitor são rotinas já conhecidas, da l- 
teratura estrangeira, outras foram escri- 
tas especialmente para o Monitor, po- 
rém, todas elas foram adaptadas para 
operarem sob a máxima segurança, além 
de funcionarem como comandos imedia- 
tos. 


DIGITAÇÃO 


O Monitor BASIC será posicionado 
no topo da memória. Antes que isso seja 
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feito, no entanto, é necessário reservar- 
lhe espaço digitando: POKE 16389,120 
e NEW LINE. Isso fará com que 2048 
bytes fiquem fora do sistema BASIC 
normal e, desse modo, protegidos contra 
apagamento. A seguir, coloque no micro 
o Editor Assembler, publicado em 
MICRO SISTEMAS nº 23, e, logo após, 
digite a Listagem 1. Essa Listagem com- 
põe mais um modo de operação para o 
Editor Assembler (modo F) e admite a 
entrada de dados em linhas, apresentan- 
do, após cada linha, a soma dos valores 
dos códigos de máquina de cada uma. 

Agora, digite RUN e opere o modo F 
(basta pressionar a tecla F). Quando o 
sistema pedir o endereço, tecle 30720 e 
comece a digitar as linhas do bloco 
Assembler (não digite os espaços entre 
os dados, eles são apenas para facilitar a 
lextura). Após cada linha, pressione 
ENTER e confira a soma apresentada no 
vídeo com a soma de cada linha do blo- 
co. Se houver algum erro, digite “—” pa- 
ra voltar à linha anterior (M provoca o 
retorno ao início do sistema). 

Quando terminar a digitação do blo- 
co Assembler, digite M e introduza os 
valores a seguir, usando o modo A: 


32760 80 
32761 78 
32762 80 
32763 78 
32764 80 
32765 78 
32766 80 
32767 78 


O trabalho está terminado. Agora é 
testar o Monitor e depois arquivá-lo em 
fita cassete. Para isso, digite a linha: 1 
PRINT USR 30741. Essa é a linha que 
opera o Monitor. Ela deve ser sempre 
escrita dessa forma e ser sempre a pri- 
meira linha do programa, caso contrário, 
o Monitor BASIC não funcionará. 

Digite RUN e... agora você tem uma 
série de comandos à sua disposição. A 
explicação e modo de operação de cada 
um deles está logo a seguir. Quando vo- 
cê estiver familiarizado com os coman- 
dos, será hora de arquivá-los em fita e, 
para 1sso, retorne ao BASIC do micro, 
digite NEW, seguido da Listagem 2. 
Após alguns segundos, o programa se 
auto-preservará (ligue o gravador e após 
a gravação, testea com o comando 
Verify N). Toda vez que você for carre- 
gar o Monitor no micro, não esqueça 
Mas digitar: POKE 16389, 120 e 
NEW. 


OPERAÇÃO DO MONITOR 


Ao se entrar no Monitor, a primeira 
mensagem é: 


MONITOR BASIC — 1983 
<RPD > MICRO SISTEMAS 
> 


indicando que o sistema aguarda um co- 
mando. Alguns comandos são finaliza- 
dos pela indicação <OK, significando 
término do comando sem erro. Se hou- 
ver uma indicação < *é porque houve 
algum erro na digitação. A tecla BREAK 
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ompe a execução de qualquer co- 
do e retorna à mensagem inicial. 
ejamos, então, os comandos do 


E 
URN 1: (tecla Y) retorna ao 
do micro com a mensagem de er- 


xxxx: (tecla K) lista o progra- 
a partir da linha xxxx (entre 1 e 
9. Se não houver argumento a Lista- 
será a partir da primeira linha do pro- 
). A listagem é feita linha por linha, 
sição AT 20,0 (até o final do pro- 
a) e a cada tecla pressionada uma 
linha ocupa essa posição. BREAK 
rompe o processo. 

VE: (tecla S) grava na fita cassete 
ograma BASIC que esteja na memó- 
A velocidade de transferência é de 
imadamente o dobro da velocida- 
ormal do micro. 


Listagem 


0 PRINT ,,''***%* MICRO EDITOR 
SSEMBLER +*4*,,,, "JOSE CARLOS 
ZA", "MICRO SISTEMAS/1983", pp 99 
ODOS DE OPERACAO:", sy "A - INSE 
DADOS HEXADECIMAL","B - INSER 
DADOS DECIMAL","C - EXECUTA RO 
NA ASSEMBLER","D - RETORNA AO 
SIC","E - ARQUIVA EM FITA", "F 
INSERE LINHA DE DADOS" 
































90 IF US<"a” OR US>"F” THEN GO 
1078 


PRINT "ENDERECO?" 
INPUT E 

SCROLL 

PRINT E;" "5; 
INPUT U$ 

5 IF U$="-" THEN LET EsE-10 
560 IF U$="M" THEN GOTO 1030 

E IF LEN U$<>20 THEN GOTO 452 





PRINT U$S;" "5; 
LET T=8 
LET X=CODE U$*16+CODE US(2) 






LET T=T+X 
620 POKE E,X 
8630 LET E=E+1 
1640 LET U$=U$(3 TO ) 

65G IF U$<>"" THEN GOTO 4600 
664 PRINT T 
GOTO 4520 


Listagem2 





PRINT USR 30741 
G00 FAST 

14 CLEAR 

20 DIM A$(2100) 
230 FOR A=l TO 2100 
LET AS(A)=CHR$ PEEK (A+3071 










NEXT A 
6] SAVE "MONITOR" 

070 FOR A=1 TO 2100 

1080 POKE A+30719,CODE AS(A) 
1090 NEXT A 

3 RUN 


> LOAD: (tecla J) recupera da fita o 
programa gravado pelo comando SAVE 
do Monitor. 

> VERIFY: (tecla V) verifica se a gra- 
vação em fita, do comando SAVE do 
Monitor, está correta. Caso contrário, o 
Monitor informa em qual endereço hou- 
ve erro. 

> VERIFY N: (tecla V e N) verifica se 
a gravação em fita, feita normalmente 

lo micro, está correta. 

> ORG: (tecla O) apresenta a organiza- 
çao da memória com três mensagens: 

PRG = quantidade de bytes gastos 
pelo programa; 

VRS = quantidade de bytes gastos 
pelas variáveis do programa; 

RVA = quantidade de bytes ainda 
disponíveis. 

> DELETE xxxx/yyyy: (tecla D) apaga 
as linhas compreendidas entre o bloco 


xxxx e yyyy (a linha yyyy não é apaga- 
da 


> LINE xxxx: (tecla L) apresenta a es- 
trutura da linha xxxx de acordo com a 
sua gravação na RAM, isto é, em três 
colunas. Veja: 


endereço valor caráter/sigmficado 
16509 0 


16510 l l 
16511 14 
16512 0 14 


16513 245 PRINT 
16514 212 USR 
16515 31 3 
16516 28 0 





Renato Degiovani é formado em Comunica- 
ção Visual e Desenho Industrial pela Pontifi- 
cia Universidade Católica do Rio de Janeiro. 
Há mais de um ano utiliza microcomputadores 
para cálculos na área em que atua. 
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Para o Apple e compatíveis, um estudo teórico e prático sobre como gerar 
figuras em alta resolução utilizando tabelas de formas. 





Alta resolução por 
tabela de formas 


Evandro Mascarenhas de Oliveira 


no de micros compatíveis com o Apple (como o Mi- 

croengenho, Maxxi e AP II, por exemplo), a respeito 
de como utilizar os recursos de alta resolução de seu equipa- 
mento através das tabelas de formas. 

As figuras criadas a partir destas tabelas utilizam vetores 
que plotam ou não linhas, formando desenhos simples ou com- 
plexos, números, símbolos etc., os quais podem ser reduzidos, 
ampliados e até mesmo rodar em tomo de um eixo (o que fa- 
cilita seu uso, principalmente em jogos eletrônicos). 

Estes vetores são codificados em binário, de acordo com a 
figura 1,e são agrupados em dois tipos: 

a) Vetores plotantes — deslocam-se traçando linhas, cujas dire- 
ções para cima, para baixo, para a esquerda ou para a direita 
são representadas por uma seta cheia, cuja ponta indica a dire- 
ção (—»). 

b) Vetores não plotantes ou só de movimento — denominados 
ghost vectors, deslocam-se, sem traçar linhas, nas mesmas dire- 
ções que os plotantes. São representados por uma seta traceja- 
da, cuja ponta indica a direção do movimento (----»). 

As figuras a serem traçadas em alta resolução gráfica devem 
ser planejadas cuidadosamente, com sua configuração deter- 
minada pelo conjunto de vetores, plotantes ou não, partindo 
de uma origem (que será o centro de rotação e posição na te- 
la), de acordo com as coordenadas da linha e da coluna, as 
quais serão indicadas pelas instruções ROT, DRAW e XDRAW 
e cujo tamanho é especificado pela instrução SCALE. 

Cada grupo de dois vetores, pelos seus códigos binários, for- 
marão um byte de seis bits, cujo decimal respectivo constitui- 
rá um dos elementos da tabela de formas (figura 2). 

Na figura 3 está representada uma cruz pelos seus vetores 
plotantes, iniciando na origem O (zero), seguindo as direções 
indicadas pelos 14 vetores e terminando no ponto de origem 
A. A organização da tabela de formas obedecerá à seguinte 
ordenação, a partir da origem O: 


El ste artigo procura ampliar os conhecimentos do usuá- 
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Vetores Binários Decimal 


Byte 


100 
100 


100100 36 


101 
100 


100101 37 


111 
100 


100111 39 


111 
110 


110111 55 


111 
110 


110111 


0 
1 
2 
3 
4 
5 
6 
F9, 
8 
9 


H 
o 


101 
110 


110101 


a qo 
MH 


110 
101 


101110 


H 
tw 





Cada vetor, dependendo da direção do desenho, terá o có- 
digo da figura 1,e os dois agrupados formarão o byte, sendo 
os três bits mais significativos o segundo vetor e'os três 
menos significativos o primeiro vetor. O número decimal cor- 
respondente ao byte de seis bits será tomado da figura 2. 

Quando o número de vetores for ímpar, o último valor que 
completará o conjunto de dois vetores finais será sempre zero 
(000) (figura 4). 

A tabela sempre termina em zero, e no caso apresentado terá 
a seguinte ordenação: 36, 37, 39,55, 55,53,46,0. 
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gura 2 — Conversão dos bytes de seis bits para decimal 











Figura 3 — Cruz formada por 14 vetores plotantes, iniciando em O e ter- 
ir em 14. O centro de rotação e de localização na tela encontra- 
seem 


Figura 4 — Representação gráfica de um CINCO ou S, com número 
ímpar de vetores 


FORMAÇÃO DA TABELA COMPLETA 


Para ser entendida pelo computador, a tabela de formas 
zompleta deverá ter uma parte inicial denominada diretório, 
seguida dos decimais relativos aos agrupamentos dos vetores 
que acabamos de analisar, e é organizada por um conjunto de 
aytes com a seguinte significação: 

» 19 byte: número de formas da tabela; 

» 29 byte: sem utilização. É ignorado pelo computador, po- 
Jendo ter qualquer valor entre zero e 255; 

» bytes seguintes: inicialmente são apontadores de cada for- 
na, denominados off-set ou distância absoluta em bytes. Esta 
distância é contada desde o início (byte 1) e é formada por 
dois bytes, sendo o segundo sempre zero, e O primeiro, o nú- 
mero total de bytes desde o início da tabela. 

O primeiro off-set é dado pela forma: DB = NF. 2+2, sendo 
DB a distância em bytes e o número de formas da tabela. 
No caso da figura 3 há apenas uma forma, portanto, NF = 1; 
logo, DB = 1 x 2+2=4,e o diretório será: 

e 19 byte: 1 (número de formas); 

e 20 byte: O (qualquer número entre zero e 255); 

e 39 byte:4 (valor de DB); 

e 49 byte:O (zero); 

e 59 byte em diante: segue a tabela dos vetores; 

e último byte: sempre zero (é o indicador do final de cada 
forma). 

Portanto, os valores da tabela de formas completa da figura 
3serão: 1,0,4,0,36,37,39,55,55,53,46,0. 

Precisamos informar ao computador onde está colocada, na 
memória, a tabela de formas, e isso é feito através das localiza- 
ções 232 e 233, que conterão os valores indicativos do início 
do endereço onde começa a tabela. O endereço 232 conterá o 
byte menos significativo, em decimal, relativo ao endereço; 
233 conterá o byte mais significativo. 

Os endereços mais usados são: 

a) 768 ou $ 0300 — área para colocação de vetores; 

b) logo abaixo do DOS — quando o DOS é colocado na me- 
mória do computador seu endereço de início pode ser determi- 
nado por PJ PEEK(116) 2256 + PEEK(115), que dá o va- 
lor 38400 (sem o DOS o valor é 49152). 

A tabela será iniciada 256 bytes antes, ou então no endere- 
ralodpesr (que também pode ser representado por $ 9500). 

o endereço 768 ($0300), os valores ficam: 


Endereço $ Decimal 
232 00 0 
233 03 3 
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Já para o endereço 38144 ($ 9500), ter-se-á: 


Endereço $ Decimal 
232 00 o 
233 95 149 


Através de POKE 232,0 e POKE 2333, ou então POKE 
232,0 e POKE 233,149, será indicado o início da tabela de 
formas. No caso do endereço 38144, deve-se garantir sua área 
através de HIMEM: 38144. 

Para carregar o computador com a tabela de formas da figu- 
ra 3 você deve usar O seguinte programa, com início em 768: 

10 POKE 232,0 : POKE 233,3 
20 FOR K= 768 TO 779 
30 READ A 
40 POKE K,A: NEXT 
50 DATA 1, 0, 4, 0, 36, 37, 39, 55, 55, 53, 46, 0 
Se for escolhida a área logo abaixo do DOS, substituir as li- 
nhas 10 e 20 por: 
10 POKE 232,0 : POKE 233,149 
20 FOR K= 38144 TO 38155 


e adicionar 
5 HIMEM: 38144 
Na figura 4 tem-se a representação do número cinco ou le- 


tra S, que possui valor ímpar de vetores e cuja organização da 
tabela será: 


vetores Binário Byte Decimal 
0 = 101 
as a 100101 37 
a 3 dll 100111 39 
acid 100 
Mex Abi, 000101 5 

S 000 


Se reunirmos os gráficos das figuras 3 e 4 numa só tabela te- 
remos: 
19 byte: 2 (número de formas); 
29 byte: O (datar valor entre zero e 255); 
30 byte: 6 (valor de DB); 
49 byte: O 
59 byte: 14 (distância em bytes desde o primeiro: seis até 
a primeira forma e oito bytes até o início da segunda forma), 
ou: 


la. forma ———ete2a. forma 
20 nd À Made pç ad 


6 bytes 


14 bytes 


e bytes seguintes: seguem a tabela das duas formas. 

O programa a seguir gera, automaticamente, o diretório e a 
tabela de vetores, calculando a distância em bytes, desde o pri- 
meiro de cada forma (off-set). Se o número total de bytes da 
tabela exceder 255, haverá erro na linha 1060, pois qualquer 
valor acima de 255 será rejeitado pelo computador (o micro- 


so 


Ondi 
NF 
EI 


NB 
B1 

B2 
DB 


TB 
Observação: B1 e B2 correspondem ao início da tabela. 


em duas ou mais, colocando cada uma com início em um ende- 
reço diferente; e antes de processar o programa, através de 
DRAW e XDRAW, indicar o endereço onde está a forma 
desejada (os endereços 232 e 233 são referenciados pelo com- 
putador antes de D 
tabela de formas). 


quer desenhar uma figura dentro da outra, sem plotar nenhu- 
ma linha de comunicação entre elas, considerando o conjunto 
como uma figura só, usamse os vetores não plotantes ou 
ghost vectors, conforme a figura 5. 


Figura 5 — Representação gráfica de um quadrado dentro do outro por 
seus vetores plotantes e não plotantes 


a ordenação dos vetores inicia a partir do centro O (zer 
termina em 26. Observe também que o vetor 0-1 é não plotan- 
te e que o quadrado intemo é gerado a partir de 1 até 9; daí, 
pelo vetor não plotante 9-10, inicia-se.o quadrado extemo, que 
termina em 26. A organização da tabela obedecerá a: 


processador é de 8 bits, portanto, o maior número que pode 
ser colocado em um mera é 255), que apontará QUANT 
ILEGAL — ERRO EM 1060, indicando o limite ultrapassado 
pela tabela, o que forçará sua reformulação. 


1000 READ NF,EI,NB,B1l,B2 

1010 DATA 4,38144,256,0,149 

1020 POKE 232,Bl: POKE 233,B2: POKE 
EI,NF 

1030 DB = 2 * NF + 2 

1040 FOR I = 1 TO NF 

1050 12 = INT (DB / NB):Il = DB - 
NB * I2 

1060 POKE EI + 2 * I,Il: POKE EI 
Fut? Tot dita 

1070 READ TB: POKE EI + DB,TB 


1080 DB = DB + 1 

1090 IF TB < > O THEN 1070 
1100 NEXT : RETURN 

1200 
1300 
1400 
1500 


número de formas 

endereço inicial 

número de bytes 

byte menos significativo 

byte mais significativo 

distância em bytes 

dados da tabela para cada forma (linhas 1200 a 1500) 


nuno 


Quando houver mais de 255 bytes, deve-se dividir a tabela 


W e XDRAW, apontando onde está a 


Agora vejamos o caso dos vetores não plotantes. Quando se 


21 22 23 24 
——+—— 


" e qo O 
AEE = () 
I5 14 13 


Nesta figura há um quadrado dentro do outro; observe ye 
o) e 
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Binários Byte 

















0-1 Dol 110001 ag 
E- 2 110 
E 3 dt ql 63 
B-4 1 
e 5 300 100100 36 
5-6 100 
Ee 7 101 101101 as 
= 8 101 
Bi: 110 001110 14 
9 001 






n 
o 
' 
n 
[mn 


110 
110 


110110 54 





» 
[mo 
] 
H 
mw 






H 
N 
' 
n 
tw 


RR 
111 


111111 63 
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w 
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me 
> 





su 111111 63 
111 


n 
w 









- 
a 


100 
- 18 100 





100100 36 


n 
= 













n 
o 


- 19 100 
100 


100100 36 


nm 
w 








nm 
o 
' 
n 
e 


101 
101 


101101 45 





mv 
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' 
nm 
» 










101 
101 


110 
110 


nn 
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101101 4s 







mn 
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mw 
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110110 54 











mv 
w 





ota: na figura 6 estão as direções plotantes mais comuns e 
eus respectivos códigos em decimal. 


GERAÇÃO DE FIGURAS NA TELA 


Através dos comandos DRAW, XDRAW, ROT e SCALE 
poderemos ver no vídeo os desenhos representativos das figu- 
ras codificadas pela tabela de formas. Analisemos um a um. 

|) DRAW e XDRAW: desenham a figura numa determinada 
posição, sendo a cor de XDRAW complementar à de DRAW 
(figura 7). A sintaxe é: DRAW (ou XDRAW) N ATC, L, sendo 
O número indicativo da ordem em que foi lida a figura na 
tabela (no primeiro desenho, N= 1; no segundo, N= 2, e assim 
ucessivamente). C e L indicam a coluna e linha corresponden- 
s ao ponto de origem O dos vetores da figura. 

b) SCALE: indica o tamanho relativo da figura, numa ordena- 
'ção que vai de 1 a 255. O valor máximo é zero, corresponden- 
do a 256 unidades na escala. Sua sintaxe é SCALE = X, sen- 
do X um número entre zero e 255. 













4 (0= zero grause 64 = 360 graus), numa rotação de 360 
aus (figura 8), correspondendo, cada 16 unidades, a um ân- 
gulo de rotação de 90 graus. Sua sintaxe é ROT = Y, sendo Y 
valor entre O e 64 (zero e 360 graus). 
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Figura 6 — Direções plotantes comumente usadas e seus códigos deci- 
mais 
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TABELA DE CORES 
EM ALTA RESOLUÇÃO 





CDI We 
co DRAW XDRAI 


0/4 PRETO = BRANCO 
3/7 BRANCO PRETO 











VERDE Fer 


AZUL 6 


VIOLETA 2 


5 




















Figura 7 — Cores em alta resolução para DRAW e XDRAW (comple- 
mentares) 


ROT= 64 ou 360º 
ROT= O ou 0? 


ROT= 56 ou = E 8 ou as? 


ROT= 48 ou 270º 0 Gror= 16 ou 90? 


Ro e 24 ou 135 


ROT= 32 ou 180º 





Figura 8 — Instrução ROT com a correspondência em graus, para varia- 
ções de oito unidades ou 45 graus por deslocamento 


Vistos os comandos, podemos então passar para o progra- 
ma, cujo objetivo é demonstrar toda esta teoria que vimos até 
agora"e executar as quatro formas (cruz, quadrado, cinco e 
quadrado dentro do outro). ROT e SCALE são demonstrados a 
através dos movimentos da figura “quadrado dentro do outro”. 8, 
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forma 


forma 


sem significado 
"off-set" da la. 
"off-set" da 4a. 


CÓDIGOS DECIMAIS DAS FORMAS 



















EZDEEEER 


Figura 9 — Tabela de formas completa do programa demonstrativo 


A sub-rotina em 1000 gera a tabela das quatro formas (fi- 
gura 9), cujo endereço inicial está em 38144. As linhas de 
2000 a 2200 mostram os valores da tabela através de PEEK 
(figura 9), fazendo RUN em 2000. As linhas SO a 160 plotam 
as figuras para SCALE = 20. 

As linhas 220 a 270 giram a figura 8 (quadrado dentro do 
outro), de O a 360 graus, com intervalos de 459 no sentido de 
giro dos ponteiros do relógio; as linhas 280 a 330 fazem o in- 
verso, girando no sentido contrário aos ponteiros do relógio. 

As linhas 500 a 550 reduzem a forma da figura 5 de SCALE 
= 3 até SCALE =5 e as linhas 560 a 610 a aumentam de 5 a 
30 no valor de SCALE. Finalmente, a linha 700 encerra o pro- 
grama, plotando a figura com o valor do último SCALE (30). 

O programa foi processado em um computador AP II da 
Unitron, com 48 Kb de memória RAM e linguagem BASIC 
(Applesoft). 
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Geração de figuras 


5 HIMEM: 38144 510 SCALE= K 1070 READ TB: POKE EI + DB,TB 

10 HOME : HGR2 520 DRAW 3 AT 140,85 1080 DB = DB + 1 

25 GOSUB 1000 530 FORL = 1 TO S0: NEXT 1090 IF TB < > O THEN 1070 

30 SCALE= 20: ROT= 0: HCOLOR= 3 540 ZDRAW 3 AT 140,85 1100 NEXT : RETURN 

50 DRAW 1 AT 100,85 550 NEXT 1150 REM TABELA DA CRUZ (FORMA 
100 DRAW 2 AT 70,150 560 FORK =5 TO 30 1) 

150 DRAW 3 AT 180,100 570 SCALE= K 1200 DATA 36,37,39,55,55,53,46, 
160 DRAW 4 AT 200,50 580 DRAW 3 AT 140,85 0 

170 FORK = 1 TO 3000: NEXT : HGRZ 590 FORL = 1 TO 50: NEXT 1250 REM TABELA DO QUADRADO(FO 
220 FORK = 0 TO 64 STEP 4 600 XDRAW 3 AT 140,85 RMA 2) 

230 ROT=K 610 NEXT 1300 DATA 44,62,0 

240 DRAW 3 AT 140,85 700 DRAW 3 AT 140,85 1350 REM TABELA DO QUADRADO DE 
250 FORL = 1 TO 500: NEXT 900 END NTRO DO OUTRO (FORMA 3) 

260 XDRAW 3 AT 140,85 1000 READ NF,EI,NB,B1,B2 1400 DATA 49,63,36,45,14,54,63,6 
270 NEXT 1010 DATA 4,38144,256,0,149 3,36,36,45,45,54,0 

280 FORK = 64 TO O STEP - 4 1020 POKE 232,Bl: POKE 233,B2: POKE 1450 REM TABELA DO CINCO (FOR 
290 ROT=K EI,NF MA 4) 

300 DRAW 3 AT 140,85 1030 DB = 2 * NF +2 1500 DATA 37,39,5,0 

310 FORL = 1 TO 500: NEXT 1040 FORI =1 TONF 2000 FOR K = 38144 TO 38182 

320 XDRAW 3 AT 140,85 1050 12 = INT (DB / NB):Il = DB - 2100 PRINT K, PEEK (K) 

330 NEXT NB * 12 2200 FORL = 1 TO 500: NEXT : NEXT 
500 FORK = 30 TO 5 STEP - 1 1060 POKE EI + 2 * I,Il: POKE EI 







































BIBLIOGRAFIA 


1) POOLE, Lon; MCNIFF, Martin; COOK, Steven — Apple II 
User's Guide 

2) HEISERMAN, David — Intermediate Level Apple II Hand- 
book 

3) COAN, James S. — BASIC Apple BASIC 





Evandro Mascarenhas de Oliveira é Médico e vem desenvolvendo suas 
atividades nas áreas de Laboratório Clínico e Instrumentação Médica. 
É usuário dos micros NE-Z8000 e AP 11. 





+2*1+ 1,12 


MICRO SISTEMAS, outubro/83 


Seduzido e abandonado. 


Isso que dizer orientação 

inteligente e correta na escolha do 

software mais adequado (também 
desenvolvemos programas especificos para as 


Esta é a história do cavalheiro que comprou 
microcomputador que ia resolver todos 
problemas da sua empresa. 
preçinho era bom e a conversa do 
endedor, atraente. Poucos dias depois ele 
Escobriu que o equipamento não resolvia 
dos os problemas (pelo contrário, criava 
uns novos) e pior de tudo, ao voltar à loja 
de tinha comprado, percebeu que ninguém 
tendia realmente do assunto. 
outras palavras, ele foi lamentavelmente 
Eduzido e abandonado. Mas nem tudo está 
Erdido: basta consultar a 
icroshop antes de comprar um 
rocomputador. 


Microshop ouve antes de falar. 
cros são formidáveis, desde que sejam 
omendados exatamente para as suas 
Ecessidades. 


Porisso nós fazemos todo tipo de 
perguntas sobre a sua atividade, e o 
tratamento das informações para podermos 
acelerar o processo de tomada de decisões. 
Nós achamos que quanto mais soubermos 
sobre o seu problema, mais fácil e completa 
será a nossa solu: 


A Microshop dá opiniões sinceras. 
Trabalhamos com todas as marcas e modelos 
importantes e não temos interesse em 
“empurrar” esta ou aquela marca. Assim, 
você tem a certeza de receber 

sempre um opinião independente. 


A Microshop resolve mesmo. 

Ao invés de um simples balconista bem- 
intencionado, nós atendemos você com gente 
formada em Computer Science na 
Universidade de Nova York. 


suas necessidades). Significa também colocar 
à sua disposição nossa longa experiência com 
profissionais liberais, empresas de pequeno 
porte e multinacionais. E mais: damos 
treinamento completo na utilização dos 
micros e softwares. 

Venha conversar conosco. Nós podemos lhe 
seduzir, mas não vamos nunca lhe abandonar. 


A loja dos micros inteligentes. 


São Paulo: Al. Lorena, 652 - CEP. 01424 - Tels: (011) 282.2105 - 852.5603. 


Recife: Av. Conselheiro Aguiar, 1385 - Loja 4 CEP. 50.000 - Tel.: (081) 326.1525 - Boa Viagem. 





ALTA RESOLUÇÃO POR TABELA DE FORMAS 


PONHA ESTE | 
NOME NA sia 
MEMÓRIA Rir 








Vamos facilitar um pouco? 


Um outro colaborador nosso, Ru- Listagem 1 
dolf Homer Jr., fez um programa Ros 3 
utilitário em BASIC (listagem 1) que RRRNN S Em TAOULAS DE FOR 





cria a tabela automaticamente sem 20 TEXT 3 HOME : NORMAL : SPEED= 
que o usuário tenha que se preocupar 
com os apontadores e com as sequén- 
cias de bits em cada byte. 

Quando o programa é executado, sa 









* POKE 233.3: REM 
à FIGURA PARA O EN 
08 (768 EM DECIMAL> 


: POKE 769,0 





computadores 


POKE 























a tecla aparece no modo de baixa re- (é pi AL 
solução de gfaficos e com um ponto E DIE FORMA odiei diga, 
de referência bem no centro. À partir So GR :X = 19:) = 19: UTAB 21: HTAB 
E Softwares para TRS-80 e Apple daí, o usuário deste editor tem, no ao Li no Si ada 
e Micro-computadores e teclado, a seguinte série de comandos: se PRINT + Esc - roma TERMINA, S 
TT) - GA-DESL 1GA": POKE 34.23 
Periféricos : e Tecla I: faz o ponto de referência ” Di EE À ; 
e Assessoria e Treinamento aobir: za 1 TO S:EVCA) = O: NEXT 
e Tecla J: faz o ponto de referência E 
ir para a esquerda. 
UA OFÉLIA, 248 - JD. PAULISTANO e Tecla K: faz o ponto de referência 
: ir para a direita. E : NEXT 


THEN 120 
soro sa 


Fone 21 1-4261 eg M: faz o ponto de referência e E 


e Tecla S: liga/desliga a marcação de 138 





pontos. De 
e Tecla ESCAPE: indica que a for- 5 ni 
ma está encerrada. é 

; + 1:18 





Utilizando estas teclas em conjun- « 

NOME NA to você poderá desenhar a forma que “E NENE DEN OR A EA 

desejar. Quando o programa é acio- : SOTO 

A nado o dispositivo de marcação de : é 

MEMORIA pontos está desligado. Use a tecla S 200 j 
sempre que quiser ligar ou desligar o 














A 210 € = c . o C.B: PRINT CHR$ 
marcador de pontos. Quando você ti- « Boto se ' 
w ver terminado a forma pressione a a oo 
É tecla ESCAPE. à POKE Crer REM ESTABELECEN 
o Você verá que imediatamente será DO O FINAL DA TABELA DE FORM 
” acionada a tela de alta resolução grá- o TEXT: HOME: HOR é HCOLOR= 
g fica e a forma que você acabou de 3: ROT= O: SCALE= 1: DRAW 1 AT 
a editar será desenhada com ROT=0e O em Pe 
ê SCALE= 1. Uma legenda indicará mu sic Dee EVTES us PRINT 
o quantos bytes foram usados na con- “PARA REGISTRA-LA! BSAVE NOM 
“ fecção de sua tabela. Para registrála  2e0 PRINT OPOR 2/6 a POR 233 
em disco use BSAVE NOME, A768,L Ste PRINT “DEFINA A ROTAÇÃO 
NB. Ed are eçsg 
* Softwares para TRS-80 e Apple NB é o número de bytes que a ta- pi ai sap 
e Micro-computadores e bela consumiu. Para testá-la use o Listagem 2 
Periféricos programa da listagem 2, que dese- Nord 
e Assessoria e Treinamento nha a forma que vocé acabou de pro- PRINT CHR$ <4>:"BLOAD NOME" 
duzir e faz pequenas rotações com se 233,3: REM 
ela no sentido dos ponteiros do re- EFINICAO DO APONTADOR DE TA 
lógio. . 
Só mais um detalhe: o beep emi- 
RUA OFÉLIA, 248 - JD. PAULISTANO tido pelo computador a cada dois A 


passos no seu desenho serve para in- RS AT 
FO o 1 


s 11-4261 dicar que mais um byte foi usado em É Nest a O zaga: 
F ne sua tabela de formas. 100 END m 
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Aproxime-se. 
Você vai penetrar agora em 
outra atmosfera. Vai entrar 
em contato imediato com 
microcomputadores, 
acessórios e periféricos 
dar última geração 
Sua pulsação 
será alterada 
Porque a 














(COMPUTADORES E SISTEMAS É 
Centro: Av. Rio Branco, 12-loja 4 
esobreloja 

Rua Sete de Setembro, 

88 -loja Q (galeria) 
Copacabana: Rua Pompeu 
Loureiro, 99 
Tels.:(021) 283-3588 - 
1253-3395 - 253-3170- 
B57-4398 - 236-7175 















































vibração das pessoas que 
habitam este lugar vai 
contagiar você. 

Estamos transmitindo 
diretamente da nova 
Clappy Copacabana, um 
espaço tecnológico 
programado com precisão 
absoluta. 

Umaidéia que tomou 
forma de casa e pousou 
sobre Copacabana 
Exatamente à rua Pompeu 
Loureiro, 99 

Entre 

Você está no centro do 
maior show room 

de microcomputadores 
do Rio de Janeiro. 
No2.ºandar fica asala de 
treinamento, onde você vai 
aprender a dominar 

e extrair o máximo de seu 
equipamento. 

Aquela luz forte lá fora é o 
pátio de estacionamento. 
Agora, sente-se 

Você vai receber a melhor 
mensagem deste anúncio: 
A-Clap-py-tem-o- 
me-nor- pre-ço - do - 


pla-ne-ta 

Ponha esta idéia na 
memória. 

Agora fixe os olhos em 
mim. Dentro de 5 
segundos, eu vou sumir 
do papel 








Câmbio. 


POMPEU 
LOUREIRO 
99 














Os sistemas criptográficos via computador e a origem do DES, o mais utilizado internacionalmente 





Criptografia, uma arma 
contra os piratas? — II 


Candido Fonseca da Silva 





a primeira parte do artigo, publicada no número pas- 
sado, descrevemos os processos convencionais normal- 
mente utilizados em Criptografia. Nesta segunda e últi- 
ma parte, passamos às suas possíveis aplicações em computadores. 

As técnicas criptográficas atualmente empregadas em pro- 
cessamento de dados têm suas origens no processo de substitui- 
ção digital desenvolvido por Gilbert Vernan, há mais de 60 
anos. Neste processo foram empregados os caracteres do códi- 
go Baudot de teletipo, código este que representa cada caráter 
por cinco bits. 





Texto em claro: 
Chave 


Texto cifrado : 





Figura 1 — Tabela-verdade do sistema Vernan 


A figura 1 mostra a tabela-verdade do sistema Veman que 
configura o ou-exclusivo ou uma adição módulo-2. É também 
um exemplo da criptografia do caráter Baudot correspondente 
à letra A, com chave F resultando o caráter C. Observe que 
Vernan criou o que hoje conhecemos por Criptografia on-line, 

A segurança deste sistema decorre do uso de chaves quase 
aleatórias de tamanho muito grande. Tais chaves eram obtidas 
pelo uso de dois laços de fita de papel perfurado, de compri- 
mento j e k, sendo j e k números primos entre si. 

Para cada ciclo de fita de comprimento j, a outra fita avança 
um caráter, dando um comprimento total de chave jk. Nos 


anos 20, valores de j e k foram 775 e 776, resultando um com- 
primento de chave igual a 601.400 caracteres. Pensando em 
computadores e em fitas magnéticas para o armazenamento de 
chave, poder-se-ia ter j= 5x10º ek= (5x109)+ 1,0 que 
permitiria uma chave de comprimento da ordem de 2,5x10!?. 

Todavia, já foi visto que grandes números não bastam para 
qualificar como seguro um sistema criptográfico. Realmente, 
o código Baudot leva a alfabetos-cifra tão rígidos e previsí- 
veis como os alfabetos Vigenêre (vide primeira parte do artigo). 
Mais ainda: se o mesmo trecho da chave for usado para cifrar 
duas ou mais mensagens, o uso de técnicas estatísticas basea- 
das no índice de coincidência e nos testes-Qui (desenvolvidos, 
respectivamente, por Friedman e Kullback), permite uma crip- 
toanálise com êxito (referências bibliográficas 1 e 2). 

Além de Vernan, os trabalhos de Shannon, em 1948-1949 
(referência bibliográfica 3), sobre sistemas de segredo servem 
de fundamento teórico para a Criptografia dos dias de hoje. 
Neles foi introduzida a noção de transformação misturadora, 
que consiste no emprego de produtos de transformações me- 
diante sucessivas substituições e transposições. 

Shannon definiu os princípios de confusão e difusão básicos 
para impedir a análise estática de um criptograma, e a ele deve- 
se ainda o conceito de distância de unicidade, a qual representa 
a quantidade mínima de textos cifrados que permite uma úni- 
ca solução. Ele provou que a distância de unicidade para um 
sistema que use uma chave aleatória que nunca se repita é in- 
finita, tornando o criptograma impossível de ser criptoanalisado. 

Os sistemas de cifra de bloco empregam os produtos de 
transformação aqui mencionados, e o sistema Lúcifer, desen- 
volvido pela IBM, utiliza estruturas de hardware que realizam 
a confusão e a difusão preconizadas por Shannon. 


MICRO SISTEMAS, outubro/83 





























NA ERA DO COMPUTADOR 


Antes de mais nada, uma pergunta: se existe um sistema 
imune à cniptoanálise, como o preconizado por Shannon, por 
que não é adotado universalmente? 

A resposta está nas dificuldades lojísticas envolvidas, a 
saber: geração e teste de uma chave puramente aleatória, de 
comprimento infinito (ou muito grande); os problemas em dis- 
tnbuir tal chave em segurança aos usuários (e os perigos de 
roubo, interceptação, suborno etc. que acompanham tal dis- 
tnbuição); a coordenação que assegura o emprego uma única 
vez de tal chave e outros fatores que tomam extremamente 
oneroso este sistema, O que faz com que apenas instituições de 
grande expressão, e mesmo assim somente para assuntos muito 
gríticos, possam utilizá-lo. 

Agora, com a entrada dos computadores no quotidiano da 
Criptografia, a busca de soluções de compromisso (as quais 
consistem em utilizar métodos que, não obstante teoricamente 
imperfeitos, tenham condições de resistir, por tempo suficien- 
te, à análise do inimigo) ganhou alento. 

Dentre tais Processos destacam-se: a Criptografia Algébrica, 
a Criptografia por Chave Pública, as Transposições Polidimen- 
sionais e os Sistemas Comerciais, Os quais veremos a seguir: 

1. Criptografia Algébrica 

A idéia básica é efetuar substituições de grupos de letras e 
não letra a letra. Faz-se, inicialmente, uma tabela de conversão 
Jetra-número: 


ABS Dr EAG E TIE DM 

S28. (2520010 25 16 

E O PO A RAD O E SS 
3 19 14 9 


Supondo substituições por grupos de quatro letras, escolhe- 
se uma matriz 4 x 4 não singular (determinante não nulo) de 
inteiros como chave. Assim, existem dois elementos arbitrários 
na escolha da chave: a ordem da matriz (n x n, sendo n um in- 
teiro qualquer) e a sua constituição. Vejamos um exemplo de 
matriz: 


10 6 


A partir dela vamos agrupar, de quatro em quatro, as letras 
da mensagem original: precisamos converter as letras em nú- 
meros (conforme a tabela de conversão, que é um fator arbi- 
trário da chave) e calcular o produto da matriz A pelos vetores 
formados. módulo 26 (número de símbolos do alfabeto usado). 

A título de teste, vamos criptografar a palavra “dela”: 


"dela" "20, 10, 16, 5" 
CORE RR 20 25 
6 9 5.10 E 
S9 Ad 16 3 
10» 46109) 3 8 28 5 14 


“Dela”, criptografada, resultou em “jc o w”. 

Na decriptografia, faz-se a multiplicação dos vetores do 
criptograma pela matriz inversa (módulo 26) de A. 

O processo tem como principal desvantagem o fato de exi- 
gir cinco operações por letra, ou seja, 20 passos por grupos de 
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quatro letras. O número de passos por grupo cresce quadrati- 
camente de acordo com a fórmula:S= nº + (n-1), sendo S 
o número de passos e n o número de letras dos grupos. 

Mesmo assim, a Criptografia Algébrica vem mostrando uma 
resistência excepcional à criptoanálise sempre que se escolhe 
uma matriz n X n, com n maior ou igual a 5. Atualmente exis- 
tem soluções propostas para casos com n=23, utilizando 
computadores e admitindo como conhecida a tabela de conver- 
são letra-número. 
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—» P (estimativa 
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DESTINATÁRIO 
(DECRIPTOGRAFIA 
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(CRIPTOANÁLISE) 
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(CRIPTOGRAFIA) 


GERADOR DE 
CHAVES Nº 1 


Legenda: 














Mensagem original 
Cc... Críptograma 
Chave 


K, -- Chave de decriptografar (privada) 





Canal inseguro (sujeito à ação do inímigo) 





suposto imune à ação do inimigo. 





MOS 
Monk Lança Ci 
Sistema Gerador de Programas 


A Monk, a dois anos vem produzindo software para mi- 
cros, lança uma i para o mercado nacional, trata-se 
do sistema”DATAMANAGER” que é um gerenciador de ban- 
co de dados (SGBD).* Usavel como gerador de programas apli- 
cativos, e criado para ser utilizado por pessoas não iniciadas 
em computação. O usuário não precisa conhecer a linguagem 
Basic ou Sistema Operacional, precisara apenas analisar seu 
problema e organizar uma solução prática, com o manual do 
programa, que é super completo, gerar seus programas apli- 
cativos. 

Exemplos de áreas que já estão utilizando o sistema “DA- 
TAMANAGER” — com grandes resultados: — Contr: ges- 
tão de estoque, Contas a pagar e receber, Controle e adm. de 
vendas, Folha de pagamento, Controle de pedidos e fatura- 
mentos, Mala direta, Criação e manutenção de cadastros e 
bancos de dados, Adm. de clínicas médicas, dentárias e escri- 
tórios de advogacia, imobiliária (adm. de contratos, imóveis, 
condomínios) e em construtoras (controle de custos de obras), 
Fazenda Agropecuária. 

Os programas podem interfacear com outros programas 
em Basic, arquivos do VisiCalc e SuperScripsit. Este super 
programa roda nos micros CP 500, NAJA e TRS-80 Ill, com 
48K — 2 disk-drives e uma impressora opcional se preferir 
obter listagens impressas. 

Demonstrações e maiores detalhes nos 66 revendedores** 
Monk por todo pais, ou diretamente à Monk, Rua E. 

* Este programa foi testado na revista Micro Mundo do mês de Agosto, nº 6 
** Relação dos revendedores na revista Micro Sistemas do mês de Agosto, nº 23. 


monk micro informática ltda. 
R. Augusta, 2690 - 2º And.- L.318e 324 - 
Teis.: 280-0163 e 852-2958 - SP 














































monk, 
o software que faz você ficar 
feliz por ter um micro. 





CRIPTOGRAFIA, UMA ARMA CONTRA OS PIRATAS? — II 


2. Criptografia por Chave Pública 

Por volta de 1975, Diffie e Hellman propuseram um tipo de 
sistema criptográfico que forçou a uma nova definição de in- 
quebrável ou imune à criptoanálise. Tais sistemas não são 
tão imunes como a cifra proposta por Shannon. Contudo, na 
prática, o esforço computacional exigido torna inviável qual- 
quer tentativa, por parte do inimigo, de solucionar as cifras 
criadas, tornando-os, portanto, computacionalmente inquebrá- 


veis. 

Na figura 2 podemos ter uma visão do fluxo de informações 
em tal sistema criptográfico. Observe que ele minimiza o pro- 
blema da distribuição de chaves, crítico em todos os demais. 

Uma aplicação para sistemas de chave pública foi feita por 
Rivest, Shamir e Adler (sistema RSA), utilizando números pri- 
mos. O sistema RSA apresenta a vantagem suplementar de per- 
mitir ao remetente autenticar a sua mensagem por meio de 
uma assinatura eletrônica fornecida pelo próprio RSA. 

3. Transposições Polidi ionais 

Como extensão às transposições por rota (vide “Criptogra- 
fia a lápis e papel”, primeira parte do artigo), têm-se as trans- 
posições por circuitos hamiltonianos em hipercubos. 





Dimensão Trajetos Hamilt. Circuitos Hamilt. 


0 o 
0 
2 


1 
2 
3 
4 
s 





Figura 3 — Circuitos e trajetos hamiltonianos em hipercubos. (*) — Para 
n= S5,estima-se em mais de um mês o tempo de computação necessário 
para obter os dados. 


Circuitos hamiltonianos formam códigos de Gray, que po- 
dem ser gerados por software de forma relativamente simples. 
Outra razão para o emprego de transposições polidimensionais 
em Criptografia é evidenciada na tabela da figura 3, onde pode- 
mos observar ser marcante o aumento do número de trajetos 
e circuitos com o aumento da dimensão. Outra vantagem é que 
o usuário autorizado não necessita gerar todos os possíveis tra- 
jetos em hipercubos de ordem 10, por exemplo. Ele necessita 
apenas gerar alguns milhares, uma tarefa relativamente simples, 
deixando para o inimigo o trabalho de gerar e testar todos os 
trajetos, o que, para a dimensão 10, é praticamente impossível. 
4. Sistemas Comerciais 

A grande maioria dos sistemas criptográficos comerciais 
gera chaves que, à primeira vista, parecem aleatórias. No entan- 
to, elas são pseudo-aleatórias. 


Sequência Pseudo-aleatória 


Operação Quadrado 





(6378)2 788 


788x6378 


40678884 
5025864 
1645524 
2901990 
121182 








Os primeiros algoritmos para a produção de sequências 
pseudo-aleatórias por computador surgiram nos anos 50. A 
chave resultante era determinística, e criada a partir de proce- 
dimentos, tais como o do meio do quadrado. Na figura 4 te- 
mos um exemplo. 

Veja que a sequência 7-8-8-2-5-8-4-5-5-0-1-9-2-11 é aparen- 
temente aleatória, mas, na verdade, ela é totalmente determi- 
nada. 

Atualmente, a maioria dos sistemas utiliza shift-registers 
que geram sequências pseudo-aleatórias, não deterministas, 
mas markovianas. Shift-registers comerciais são cascatas de 
séries de estágios binários, e o ciclo máximo da sequência 
pseudo-aleatória (20.1), para um total de 20 estágios, dá um 
ciclo de chave de 1.048.575 bits. 

Formas de se quebrar sistemas criptográficos com base nes- 
tas sequências de chaves são objeto de diversos artigos existen- 
tes na literatura. 


O LÚCIFER E O DES 


Na virada dos anos 60-70, a IBM instituiu um programa 
de pesquisas para o desenvolvimento de sistemas criptográficos 
para uso em sua linha de produtos. Tais pesquisas conduziram 
ao sistema de cifra em bloco (criado por Feistel, Notz e Smith) 
que tinha, como um de seus componentes, uma unidade de 
hardware para criptografia denominada Lúcifer. 

Alguns circuitos da Lúcifer utilizavam estruturas de substi- 
tuição e transposição que, efetivamente, realizavam a difusão 
e a confusão pregadas por Shannon. Este sistema criptográfico 
serviu como ponto de partida para o padrão de criptografia de 
dados (Data Encryption Standard — DES) projetado pela IBM 
e adotado pelo NBS (National Bureau of Standards) dos Esta- 
dos Unidos. 

O DES é um sistema de criptografia que emprega blocos de 
cifras que constituem um conjunto de 64 bits sob o controle 
de uma chave de 56 bits. O mesmo algoritmo e a mesma chave 
adotada na criptografia da mensagem são usados para recupe- 
rar O texto em claro. 

O bloco de dados a ser cifrado passa inicialmente por uma 
permutação denominada IP e, em seguida, por uma permuta- 
ção dependente da chave (bastante complexa); finalmente, 
passa por uma terceira permutação IP-!, que é o inverso da 
computação inicial. Na notação do NBS, a computação depen- 
dente da chave é definida por uma ei f, chamada função- 
cifrar; uma outra função — KS — cria a forma pela qual a chave 
aparecerá como um dos argumentos da função f. 

Maiores detalhes sobre o algoritmo podem ser encontrados 
nas referências bibliográficas 4 e 5. 

O DES foi implementado por diversos fabricantes de cir- 
cuitos integrados nos Estados Unidos, o que torna sua utiliza- 
ção fácil e barata. São eles: 

a) Fairchild — O Fairchild 9414 consiste de quatro chips e usa 
tecnologia I?L. Possui a maior velocidade de funcionamento, 
ou seja, cinco microssegundos por bloco. 

b) IBM — Dispositivos de hardware acoplados apenas a siste- 
mas completos. 

c) Texas — O Texas Instruments TMS 9940 é um dispositivo 
da família 9900 de microprocessadores de 16 bits e consiste 
de um firmware adaptado a um processador 9900; seu tempo 
de cifragem é de 13 milissegundos, incluindo a entrada e a saí- 
da de dados. 

d) Motorola — O Motorola MGD 8080 DSM ou o MGD 6800 
DSM são chips que podem ser utilizados com o 8080 ou com o 
6800, respectivamente. Funcionam como periféricos e pos- 
suem dois registradores para chaves: um para a chave mestra e 
outro para a chave de trabalho; permitem o duplo enciframen- 
to e têm um tempo de 130 microssegundos para o processa- 
mento de um bloco de texto. Sua tecnologia é N-MOS. 
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) Intel — O Intel Data Encryption Unit 8294 é semelhante, 
concepção, ao equipamento da Texas, porém não possui a 
pacidade de manipulação de chaves, necessitando ainda de 
processador separado para seu funcionamento. Seu tempo 
cifragem de um bloco é de 100 milissegundos. 
Rockwell — O Rockwell Collins CR-300 é um sistema de 
iptografia (um cartão) que possui uma memória além do 
chip que permite o armazenamento de 32 chaves em forma ci- 
frada. Utiliza tecnologia p-MOS com um tempo de cifragem 


em duas versões de 28 ou 40 pinos. A diferença básica é a 

istência de uma porta dual que permite enviar dados por 
“uma delas e capturar a mensagem cifrada pela outra. Seu tem- 
po de cifragem é de 48 microssegundos, possui condições para 
entrada e manipulação de chaves e é compatível com o 8080 e 
o Z80. 
Sobre este chip gostaríamos de fazer mais algumas conside- 
rações. A investida da Westem Digital na área de Criptografia 
deu ao mercado um sistema de velocidade considerável que 
permite ser aplicado diretamente em sistemas de terminais in- 
teligentes com arquivo em disquetes. Além disso, projetou uma 
espécie de kit de criptografia que pode ser acoplado em qual- 
quer microprocessador, agindo apenas como mais um perifé- 
rico. 

CONCLUSÃO 


A partir da década de 60, em virtude da expansão do tele- 
processamento, a pesquisa de sistemas criptográficos para da- 
dos foi intensificada. 

Vários trabalhos foram e vêm sendo desenvolvidos visando 
certificar a segurança do DES. Em pesquisas realizadas por 
Hellmann e outros, foram encontradas algumas simetrias que 
levam a criar suspeitas sobre as estruturas, principalmente das 
chamadas caixas S (S-boxes), as quais contêm, basicamente, o 
cerne do sistema. 

Outro ponto levantado por Hellmann é o fato de que nem a 
NBS nem a IBM liberaram qualquer informação sobre a estru- 
tura do DES na forma em que este foi projetado. Por isto exis- 
te, na comunidade científica, uma certa descrença quanto à 
segurança do sistema, uma vez que parte das informações so- 
bre ele é mantida em segredo. 

Mesmo assim, O governo americano propôs que o DES fos- 
se usado em comunicações federais onde o nível de segurança 
não fosse considerado exagerado. A maioria das empresas pri- 
vadas também o tem escolhido para implantação de sistemas 
de comunicação de dados, visto ser o único conhecido para 
esta finalidade. 

Entretanto, uma questão deve ser levantada. Como o conhe- 
cido “Problema da Mochila” — onde uma sequência de dados é 
empregada para cifrar uma mensagem a qual apenas o possui- 
dor da chave poderá decifrar —, pode-se considerar que este 
tipo de sistema contenha alguma armadilha (o nome do pro- 
blema, em inglês Trapdoor Knapsack, sugere que existe uma 
armadilha). Mais grave ainda, esta armadilha pode se encontrar 
nas mãos dos homens que a projetaram ou com os possíveis 
possuidores da estrutura do projeto. 

Tal possibilidade não pode ser descartada, mas qual seria a 
solução? O desenvolvimento de um novo sistema ou a utiliza- 
ção da estrutura do DES com algumas modificações que difi- 
cultassem o acesso a um conhecedor da armadilha? 

Seja como for, o mais importante é que, através da Cripto- 
grafia, o usuário de micros dispõe de uma ferramenta para pro- 
teger o sigilo de suas informações, quer pelo uso de processos 
que remontam à Antiguidade, quer pelo uso de técnicas dos 
dias de hoje; quer as informações a proteger sejam arquivos de 
dados ou programas. 


MICRO SISTEMAS, outubro/83 


Enfim, acreditamos que podemos responder afirmativamen- 
te à pergunta do título deste artigo: sim, Criptografia é uma 
arma contra a pirataria do software. 
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Agora que você acabou de ler a parte final do artigo de Criptografia, 
que tal ter um programa arquivado em um código particular??H 





Programe em segredo 


Roberto K. Heringer 





ste programa, desenvolvido no 

D-8002 e com 1573 bytes, si- 

mula uma técnica criptográfica, 
codificando e decodificando uma men- 
sagem através de um código específico, 
predeterminado. 

Por exemplo, se você digitar a frase 
REVISTA MICRO SISTEMAS, o pro- 
a transformará em PZVA! 
CALPRWUAUXZCKU, e assim por 
diante. Para decodificar, basta fazer o 
inverso, ou seja, digitar a frase codifi- 

cada que o programa a traduzirá. 

A mensagem a ser traduzida pode ter 
o tamanho que você quiser; é necessário, 
apenas, que você digite uma frase de ca- 
da vez, seguida do comando ENTER. 

Uma característica interessante deste 
programa é que você pode mudar, se de- 
sejar, os caracteres considerados, cifran- 
do o seu próprio código. Você deve, in- 
clusive, usar números ao invés de letras, 
o que o tomará bem mais inacessível. 

As aplicações deste programa são inú- 
meras. De uma simples brincadeira, ele 
pode ser utilizado para arquivar relató- 
rios secretos, manter diálogos confiden- 
ciais, programas em um código particu- 
lar... Neste ponto, você é quem decide. 





Roberto K. Heringer é Técnico-químico e li- 
cenciado em Sociologia. Atualmente desempe- 
nha a função de assessor na divisão têxtil do 
grupo Heringer. Utiliza microcomputadores 
tanto no trabalho como na tese de doutorado 
que está desenvolvendo. 











> REM PROGRAMA DE CODIGOS : 
AUTOR = ROBERTO K. HERINDE 
R 


CLEARSOOC 

CLS:PRINT"PARTE A REQUERER 
PRINT"i. 
PRINT'"2. 
INFPUTY 
IFV=1THENL1ELSEÍITE 


els 


INPUTAS 
FORX=iTOLEN(AS: 
G=LEN(AS) 

IDS(AS.X. 1) 
ND (SC) 2 IFSK 

"WºELSEF$S="v" 
17 S0TOLOT 
12 PRINTCS: 
IFC$=" 


Dm 


CODIFICACAO” 


DECODIFICACAO" 





pera papa pa pa (o EM qa (4 


Ms uUsDe 


(2STHENF $= 


"THENLPRINT"K” 
THENLPRINT"M 
THENLPRINT"L 
"D"THENLPRINT"N 
E”THENLPRINT"Z 
"Pº"THENLPRINT"I 
"G"THENLPRINT"H 


















"MºTHENLPRINT 
THENLP 
THENLPRIA 
"THENLPRINT 






















VRºTHENLPRINT 
"S"THENLPRINT“U 
"T"THENLPRINT"X" 











Z"THENLPRINT"S"s 
126 IFC$=" "THENLPRINTF: 
127 IFC$="."THENLPRINT" 
128 1FC$=":"THENLPRINT">"s 








Programa de Códigos 


131 
132 
i3z 


138 
139 
140 
141 
142 
143 
200 
201 

202 
Zoz 
204 
205 
206 
207 
20 
209 
210 
211 
213 
214 
218 
216 
217 
215 
219 
som 
ane 
227 
228 
229 
230 
231 


IFC$="-"THENLPRINT" 
NEXT 

LPRINT 

INPUT"+ PALAVRAS + ":H$: 
IFH$="SIM"ORH$="S"THENIZ 
ELSEEND 


els 

INPUTAS 
FORX=1TOLEN(AS) 
=LEN(AS) 
C$=MID$S(AS.X. 1) 
GoTD200 














"THENLPRINT"A” 
M"THENLPRINT" 
L"THENLPRINT"” 
N"THENLPRINT" 
Z"THENLPRINT" 
W"THENLPRINT" 
YºTHENLPRINT 
I"THENLPRINT"E 
HºTHENLPRINT" 
"THENLPRINT" 
A"THENLPRINT 
D"THENLPRINT 
E"THENLPRINT"” 

="E“NTHENLPRINT 
IFC$="C"THENLPRINT 
F"THENLPRINT" 
1FC$="R"THENLPRINT” 

="Q"THENLPRINT 

O"THENLPRINT"O"” 

"THENLPRINT 
U"THENLPRINT"S 






















































Nº: 







THENLPRINT' 
















INFUT"+ PALAVRAS + “:F$: 
JEF$="CIM"ORFS=""THENIS 
PELSEEND a 
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Consórcio ou financeira? Se você ainda está na dúvida, consulte seu micro 
da linha TRS-80 Modelo ! ou Ill. Ele lhe dirá qual a melhor opção 


Calcule os juros e 
decida melhor 


L. C. Lobato 


dedor de consórcio, e que ele quase o convenceu de 
que este é o melhor negócio do mundo para se com- 
prar um carro novo, melhor do que recorrer a uma financeira. 

E o papo dele é bom: o consórcio começa com uma presta- 
ção baixa, a prestação da financeira é salgada; a prestação do 
consórcio vai aumentando suavemente e você ainda pode ante- 
cipar prestações do consórcio (as últimas, é claro) etc. etc... 

Bem, aí você fica na dúvida, faz as contas do ponto de vista 
do vendedor, pega o coeficiente da financeira (se assusta com a 
prestação), multiplica, soma, subtrai e... continua na dúvida. 
Para ajudá-lo, vem um amigo e diz: “Não vai nessa que é fria. 
Tem gente querendo até dar a cota do consórcio porque não 
aguentar pagar! É que nem BNH...”.Chega outro e diz:“Você já 
fez as contas dos juros da financeira? Já viu o valor final do 
carro? No consórcio você não paga juros!” 

Nesse ponto você desiste e apela para seu micro, amigo fiel 
de todas as horas. Frio, calculista e impessoal, o micro lhe 
apontará a melhor opção. 

O programa Cálculo de Juros irá ajudá-lo a tomar esta difí- 
cil decisão. Ele tem três funções: 


1 — Projeção de um valor atual no futuro 


'D igamos que você já tenha sido atropelado por um ven- 


Essa opção, no nosso exemplo, é a do consórcio. Você tem 
o valor atual da prestação, sabe que ela cresce de acordo com 
os reajustes mensais do preço do carro desejado, a uma taxa es- 
timada, e sabe o número de meses do plano do consórcio. Cada 
prestação será calculada de acordo com a fórmula: 


Pg = Polis to) 


onde: 


P; = valor da prestação 1 
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i=1,2,3,...,n=número da prestação 


tx = taxa mensal de reajuste 


Po = prestação inicial (em geral, é a 
entrada) 
2 — Valor presente de prestações mensais 


Essa opção, de acordo com nosso exemplo, é a da financei- 
ra. É conhecido o valor fixo da prestação, a taxa mensal de ju- 
ros e o número de meses. O valor presente é o valor correspon- 
dente a cada prestação se ela fosse paga hoje. É calculado pela 
fórmula: 


vi = PIC)! 
onde: 
Vj = valor presente da prestação i 
i = 1,2,3,... ,;n=número da prestação 
tx = taxa de juros ao mes 
P = valor fixo da prestação 


3 — Projeção comparativa entre as opções 1 e 2 


Com esta opção, você tem a comparação entre as duas ante- 
riores, e poderá analisar mês a mês o que está acontecendo. O 
resultado sai com o seguinte formato: número do mês, valor 
atual do consórcio, prestação da financeira, diferença consór- 
cio/financeira, valor presente da diferença e valor acumulado 
do valor presente da diferença. E 

O programa foi desenvolvido em um DGT-100 com 16 Kb 
de memória, cassete e impressora. Roda, portanto, em qual- 
quer micro da família TRS-80 Modelos I e III, tais como: 
D-8000/1/2, CP-S00, CP-300, Naja, JP-01 e JR Sysdata. Se vo- 
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cê possuir disco, pequenas modificações deverão ser feitas nos 
comandos que testam o status da impressora. 


COMO OPERAR O PROGRAMA 


Após RUN, você deverá informar o número da opção dese- 
jada. Se escolher a 3 você passará obrigatoriamente pelas 1 e 2. 
Em cada caso, além de informar valores das prestações, as ta- 
xas e os prazos, é feita a pergunta O VALOR DO PRIMEIRO 
MÊS E' CORRIGIDO (S/N)?. No caso do consórcio, normal- 
mente O primeiro pagamento é à vista, logo, é valor atual. Você 
deverá, portanto, responder N; no caso da financeira, normal- 
mente o primeiro pagamento é feito 30 dias após a data, logo, 
você deverá responder S. 

O cálculo será feito de acordo com as fórmulas descritas an- 
teriormente e os resultados mostrados na tela. Além dos valo- 
res mensais, serão calculados dois totais: TOTAL GERAL e 
PRODUTO. O primeiro é a soma das parcelas calculadas; o se- 
gundo é o número de parcelas multiplicado pelo valor sem cor- 
reção. No caso do consórcio, corresponde ao valor total do 
carro; no caso da financeira, é o valor total do financiamento. 

Em seguida o programa pergunta se você deseja imprimir ou 
não. Caso você responda S, o programa pergunta se a impresso- 
ra está OK. Se estiver, aperte a tecla RETURN (ou ENTER). O 
programa testa O status da impressora, que poderá variar de um 
computador para outro, dependendo do Sistema Operacional, 
do tipo da impressora e da forma de ligação ao micro. Caso 
não esteja OK, ele devolve o status encontrado e pergunta de 
novo se está OK. 

Se você escolheu a opção 3, depois de responder às questões 
das opções 1 e 2, você poderá alterar os valores calculados da 
opção 1. Para tanto, siga as instruções do programa atenta- 
mente. 


mensagem de advertência, com os valores anterior e atual. Se 
estiver OK, responda S; se não, responda N, e você poderá alte- 
rar novamente as parcelas que quiser. 

Depois dessa escolha, serão impressos automaticamente os 
valores comparados mês a mês. A impressora deverá estar pron- 
ta, pois o programa não vai testar O seu status agora. 


DESCRIÇÃO DE COMANDOS E VARIÁVEIS 


Seguem, adiante, alguns comentários sobre os comandos 
mais importantes do programa: 


10 — reserva área para as variáveis que serão 
usadas para o cálculo das prestações; limite = 
50 prestações; 
40a 70 — seleciona a opção desejada; 
80a 90 — executa as sub-rotinas de acordo com a opção; 
1000 a 1060 — calcula a opção 1; 
1200 a 1260 — | lista no vídeo os resultados da opção 1; 
1500 a 1560 — rotina de DUMP de vídeo para a impressora; 
2000 a 2060 — calcula a opção 2; 
2200 a 2260 — lista no vídeo os resultados da opção 2; 
3000 a 3020 — calcula as opções 1 e 2; 
3200 a 3330 — lista no vídeo os resultados da opção 3; 
3500 a 3530 — rotina de montagem da linha de impressão; 
4000a 4140 — rotina de alteração das parcelas da opção 1. 


Agora, vamos descrever as variáveis usadas no programa: 


V1(50) — valores mensais do consórcio; 
V24(50) — prestações mensais da financeira; 
VA & — valor atual do consórcio; 

Ti & — taxa de reajuste mensal do consórcio; 
M1 número de meses do consórcio; 

PM * — prestação mensal da financeira; 


























Caso o valor total das parcelas (TOTAL GERAL) seja alte- 
rado em consequência dessas modificações, será emitida uma T2 & — taxa de juros mensal da financeira; 
CURSOS OFERECIDOS 
Introdução à Eletrônica Digital 
icroprocessadores 

E SOFTWARE HOUSE | cosiin. o ses compassos as ima 
Apple utilizar o sistema CP/M, beneficiando-se 

SISTEMAS EM LANÇAMENTO de uma enorme quantidade de programas para 

i : uso geral. Placa CP/M, manual, sistema opera- 

parade re e Led ro ra cional: 

Administração de imobiliárias COBOL ANSI 

Classificação internacional de doenças REVENDEMOS Na COPEC S.A, o seu computador 

Ultrassonografia pessoal também utiliza COBOL ANSI. 

Controle computadorizado de clientes (consultório) racinágal A o 

ivros, revistas, disquetes, réguas 
Comunicação pers Fluxograma formulários contínuos. 
Controle bancário Copec Eco ade dE a 
po Dactari Joy Stick 
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Jogos Copec Impressoras 
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Software IBM 4331/4341 — Sistema integrado, ON-LINE igação o Som em cio sooravar 

REAL TIME, pera suporte operaoloenal o aiministrativo | Aogune” “e “tro dsprados E 

das áreas comercial e financeira de empresas. Móveis para 

Sistema Copec de monitoração e comunicação para oca sa 

E para impressoras 
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M2 — número de prestações da financeira; 
Ci £,C2 4,03 4,04 4,C5 4 — valores calculados para 
relatónio. 


UM EXEMPLO REAL 


Foi-me apresentada a opção de compra de um carro da 
marca Corcel através de consórcio, onde o valor atual da pres- 
tação (Abril/83) era de Cr$ 74.600, em SO meses. Era suposto 
um TN mensal de 8% das prestações (acompanhando a 
ORTN). 

Por outro lado, tinha-se a opção de uma financeira em 24 
meses, com o coeficiente de 0,09812, o que deveria correspon- 
der a uma taxa de aproximadamente 8% ao mês. 

Acontece que na financeira você retira o carro imediata- 
mente, e no consórcio, para ser capaz de retirar o carro no pri- 
meiro mês, seria necessário um lance de 17 prestações no mí- 
nimo (isto, segundo o vendedor do consórcio), restando, en- 
tão, 33. Considerando esse valor também como entrada na fi- 
nanceira, o saldo a ser financiado seria da ordem de Cr$ 2 mi- 
lhões, o que daria uma prestação de Cr$ 196.240 por mês, em 
24 meses. 

Observe que, no caso do consórcio, a primeira prestação é 
de Cr$ 74.600, a segunda, Cr$ 80.567, assim por diante, até a 
334, que é de Cr$ 875.586, supondo reajustes mensais de 8%. 

O TOTAL GERAL é a soma de todas essas parcelas reajus- 
tadas calculadas mês a mês. O PRODUTO é simplesmente 33x 
74.600, ou seja, o valor do saldo do consórcio hoje, se você 
fosse quitálo. 

No caso da financeira, o valor da primeira prestação, em va- 
lor presente, é de Cr$ 181.703, da segunda, Cr$ 168.244, e 
assim por diante, até a 24 que é de Cr$ 30 946. 

O TOTAL GERALé a soma do valor presente de todas elas. 
Note que esse total deveria dar Cr$ 2 milhões, se a taxa fosse 
exatamente 8%. Devido a erros de arredondamento, ou devido 
à taxa não ser exatamente 8%, deu uma pequena diferença de 
Cr$ 66.163. O PRODUTO é 24x196.240, que é o valor total 
do financiamento. 

Na projeção comparativa mês a mês, o consórcio começa no 
mês zero (entrada de Cr$ 74.600) e a financeira começa no 
mês um. Observe que a prestação do consórcio alcança a da fi- 


nanceira no mês 13, e a partir daí a diferença acumulada dimi- 
nus, mudando de sinal a partir do mês 27. Resultado: o consór- 
cio dá um prejuízo de Cr$ 395.637 em moeda de hoje (valor 
presente da diferença acumulada). 

Já dava para perceber essa diferença apenas comparando o 
produto do consórcio (Cr$ 2.461.800) com o TOTAL GE- 
RAL da financeira (Cr$ 2.066.183), porque ambos estão cal- 
culados em valor presente. Com efeito: 2.461.800 — 2.066.183 
=395.637. 

Aleluia! Funciona! 

Bom, aí vem o vendedor do consórcio e contra-ataca com 
um argumento fulminante: “Doutor, o senhor pode pagar an- 
tecipadamente algumas prestações e reduzir a quantidade de- 
las, abatendo justamente as últimas, que são as maiores.” 

Tudo bem, de volta ao micro! Para verificar mais essa alter- 
nativa, teremos que alterar os valores calculados para a opção: 
do consórcio. Supondo-se que as seis primeiras prestações do 
consórcio sejam pagas em dobro, teremos apenas 26 prestações 
ao todo no consórcio. 

Como era esperado, a diferença muda de sinal várias vezes 
devido à antecipação das prestações, que faz com que o valor 
delas se aproxime mais rapidamente do valor das prestações da 
financeira, e a diferença acumulada fica a favor da financeira 
mais cedo. Resultado: o consórcio dá um prejuízo de 
Cr$ 395.631! É praticamente o mesmo resultado anterior com 
um erro de arredondamento de seis cruzeiros. 

Bem, nessa altura do campeonato, a escolha é sua. O micro | 
já fez (e muito bem feito, modéstia à parte) o que lhe cabia. O 
resto é com você. 

E eu, o que fiz? Resolvi não trocar de carro, porque não 
poderia pagar nem um nem outro. Paciência... E quanto a vo- 
cê, entre com os dados de seu caso específico e boa sorte! 


Luiz Carlos Lobato Lobo de Medeiros é Engenheiro Eletrônico formado 
pelo ITA em 1968. Começou a trabalhar em processamento de dados 
em 69, nas áreas de Produção e Suporte Técnico em equipamentos IBM 
e atualmente é Assessor do diretor de Recursos Humanos da Telebrás 
para assuntos de processamento de dados, em Brasília, cargo que tem 
como objetivo estimular a utilização de microcomputadores entre os 
empregados da diretoria. 


SENTE DIF. ACUMULADAS 


10 * CALCULO DE JUROS — LOBATO - 19/05/83 
20 CLEARI000! DEF INTA-2+ DINVIS (50 + 20 (50) 
30 CLS: PRINTTAB (20) "CALCULO DE JUROS” PRINT 
40 PRINT"ESCOLHA UMA DAS OPCOES ABAIXO 

SO PRINTTAB(10)"O — Et 


ENCERRAR 
PRINTTAB(10)"1 - PROJECAO DE UM VALOR A 
TUAL NO FUTURO": PRINTTAB(10)"2 - VALOR PRE 
SENTE DE PRESTACOES MENSAIS” 
60 PRINTTAB(10)"3 - PROJECAO COMPARATIVA 1 E Zº4PRINTE 


PRINT 
70 INPUT"QUAL A SUA OPCAO"! OP: LFOP=OTHENENDEL SE IFOP>3T 
MENPRINT"OPCAO INVALIDA”: GOTO7O 


1000 * PROJECAO DE UM VALOR ATUAL NO FUTURO 

1040 CLS: INPUT"VALOR ATUAL ="ivAs 

1020 PRINTOZS. "TAXA MENSAL (X) =*44 INPUTTIO!TIGSTIN/100 
ee 

1030 PRINTS, “MESES =*11 INPUTAL 

1040 INPUT"O VALOR DO PRIMEIRO MES E” CORRIGIDO (5/N)*1 
ais 

1050 IFALS="S*TMENVLO (0) =0! FORI=1 TONI EVLO (1 =VAge TLM: Y 
AO= VINCI) SVIO (O) = VI BO) SVLO (1) ENEXTELSEIFA 19< "Nº 
THENIOSOELSEVIO (1) =VABIVIO (0) =VIB(1) EFORIaZTONI: 
VIOCT) e VAGOT LES VAG=VIO CT) E VIO O) ey LO (OW LOC) ME 


1200 * LISTAGEM DOS RESULTADOS OPCAO 1 

1210 PRINTTAB(10) "RESULTADOS OPCAO "50 

4220 FORI=1 TONI SPRINTFIXCVIQCI))» ENEXT 

1230 PRINT"TOTAL GERAL = *5FIX(VIGCO))5:PRINT"PRODUTO = 
ES TFALS="NºTHENPRINTRLOVIO (1) ELSEPRINTAI SFIX(VIO 
eum 

I24O VP=(ASFIXIMI/4)) 064! PRINTOVP "QUER IMPRIMIR (5/N)* 
4t INPUT: IFBS="Nº THENRE TURN 

1250 1FBSC>"S"THENIZAO 

1260 GOSUB1 500! RETURN 

1499 * ROTINA DE DUMP DA TELA 

1500 PRINTOVP+25, "IMPRESSORA OK”+ 1 INPUTBS!* IFPEEK (14312 
)CD6ZTHENPRINTAVP+4S, "STATUS = "sPEEX (14312) GOTO 
1800 


Cálculo de Juros 


1S0S LPRINTOMRS (10) CHRSC10)S 

IS1O Kim60:k200 

1520 FORI=OTOLS:PB=VARPTR (B8) Pie (PR)32767) 6 (PB-65536 
= (IPB I2768) PB) :POKEPA. 64 1POKEPAS 1, KZ! POKEPASZ. 


“ 

1530 1FBSC)STRINGS (64, 32) THENLPRINTES 

ISMO K2eKZ+641 IFK2e256THENKZO: KI vKL ot 

1560 NEXTIRETURN 
* VALOR PRESENTE DE PRESTACOES MENSAIS 

2010 CLS: INPUT PRESTACAO MENSAL =*;PMO 

2020 PRINTOZE.* TAXA MENSAL (X) =*54 INPUTTZO:T20=T20/100 
“e 

2030 PRINTOSZ. “MESES ="1+ INPUTMZ 

2040 INPUT"O VALOR DO PRIMEIRO MES E" CORRIGIDO (S/N) *+ 
aos 


2050 IFAZO="S"THENVZS (0) =0: FORI=1 TOMZIVZO CI) =PHa/T20L PM 
0=V28 (1) :V2O (0) =V20(0) *VZO LT): NEXTELSE LFAZOC >" NºT 
MENZO40EL SEV26 (1) =PHOSVZO (0)=V20C1) !FORI=ZTOM2: V2 
0CT)=PO/T2O:PHOSVZO CT) E VZ0 (0) =V20 (0) *VZ0 CL) NEXT 

2060 RETURN 

2200 * LISTAGEM DOS RESULTADOS OPCAO 2 

2210 PRINTTAB(10) "RESULTADOS OPÇAO "10 

2220 FORI=I TOMZIPRINTFIX(VZO(I))»aNEXT 

2230 PRINT"TOTAL GERAL = *;FIXIVZO(O) )1SPRINT"PRODUTO = 
“SL IFAZS="Nº THENPRINTHZ0V28 (1) ELSEPRINTAZ oFIX(VZO 
eureTam 

2240 WP=(40FIXIND/4)) 064: PRINTEVE, "QUER IMPRIMIR (5/N)* 


3010 BOSUB1 000: GOSUB! 200: G0SUB2000: GOSUBZ200 


3020 RETURN 
3200 * LISTAGEM DOS RESULTADOS OPCAO 3 
3205 G0sUB4000 

210 CLS:PRINTTAR (10) "RESULTADOS OPCAO *:0P 

3220 PRINT-MES VALOR ATUAL PRESTACAO DIFERENCA DIF.PRE 


3230 IFALSO"NSTHENCIGSVIO (1) SLISNLELSECIONOSL LuM1+1 

3240 IFAZSE"N"THENCZO=V2O (1): L2=HZELSECZO=OSL ZeM2+1 

3250 IFLIDLZTHENNSAL IELSENS=L 2 

3260 C5M=C1-C2W:CAM=CIM: CSMeCAM: MM=O 

3270 GOSUBISOO: J=0: LPRINTCMRS (10) ECHRS (10) 1 

3280 FORNH=LTONS 

3290 IFALS="NºANDAA= MI THENCI = CELSEIFALS= “Nº THENC! ey 
10(MH+1 ELSE LFNADMI THENCI We OELSEC 1 B=V 18 (MM) 

3300 IFAZOe"N"ANDIA= MZ THENCZO=OELSEIFAZO="Nº THENCZWey 
28(1) ELSE IFNM)NZTHENC20S0EL SEC20=V28 (1) *T28 

HO CSONCIO-C20ICAMCIA/TXOLNAICSO=CSDeCAS 

3320 GOSUBISOO: IFMA-J=> 1 ITHENGOSUBIS10! CLS! Ja J+13 

J330 NEXT! BOSUBIS1O!RETURN 

3500 * RELATORIO DAS DIFERENÇAS COMPARADAS 

3510 BS=STRO (NA): IFLENCBS)CITHENDS=" "+p8 

3515 IFCIO=OANDCZO=OTHENRE TURN 

3520 PRINTES: TAB(6)FIXICIO) ITAB (17) FIX(C2O) ITAB(27)FIX 
(ESOM E TAB (39) FIXICAM) TAB (52) FIX (CSA) 


3530 RETURN 

4000 CLSt INFUT*QUAL A TAXA PARA CALCULO DO VALOR PRESE 
NTE DA DIFERENCA *4 TXM! IFTXO=OTHENTHBAT IGELSETXA 
=Txa/ 1008614 

4010 INPUT*DESEJA MODIFICAR VALORES CALCULADOS (8/N)*; 
AS: IFAS="Nº THENRE TURNEL SE IFAS< "5" THEN4OIO 

4020 PRINT"DESEJA MUDAR: *!PRINTTAB(10)*O - NADA": PRINT 
TAB(10*1 - PROJECAO DE UM VALOR ATUAL"IPRINT 

4030 INPUT"DE O NUMERO DA OPCAO DESEJADA”: 1+1FI=OTMENR 
ETURNEL SE IF 1< >1 THENSO3O 

4040 CLS: PRINT" INFORME O NOVO VALOR OU -1 PARA MANTER 
O VALOR ATUAL OU -2 PARA ENCERRAR A MODIFICAÇÃO” 

4050 CLS: 1=0 

4060 IeI+LSPRINTOMES" II!” VALOR ATUAL ="SFIX(VIGCI), 

4070 INPUTCLO: LFCIR=-ZTHENS 1OOELSEIFC 1 8=-1THENSOSO 

“080 VIS(I)=CIO 

4090 IFICMITHENAO6O 

4100 C18=0!FORI=I TONI FCLO=CLOSVIO CT): NEXT 

4110 IFCLO=VIS(O) THENRETURN 

4120 CLS:PRINTA SOMA DAS PARCELAS FOI ALTERADA"! PRINT 

4130 PRINTVALOR ANTERIOR ="; VISIO). "VALOR ATUAL ="1C10 

4140 INFUT"ESTA” TUDO OK (S/N)*1A8! IFAS="S”THENRE TURNE 
LSEIFASC>"NºTHENS L40ELSE40SO 
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4 partir de hoje estarei em sua memória todos os 
lias, no trabalho, em casa, no lazer. Agora somos 
lois, eu e você. Sou flexível e se você desejar, né 
node me utilizar com todos os K-Bytes de potência. ; 
Quando estivermos juntos, não ficará somente uma 
vaga lembrança, mas sim, muitos bytes de memória. , 
Você pode me encontrar em todas as modalidades, E í 
Simples ou dupla face, 8 ou Ss 4 É 
sou compatível com todos os tipos de Drives F 

e minha c ertificação é garantida de zero erros. p” fear é PA 
Agora você pode me adquirir em qualquer ponto ) 
lo Brasil, através da Rede Nacional de 8 


Representantes e Revendedores. NF / ! / 
o Yy í 
t 
e 
Ci 


há pe ' y 
= | a Vá Maca 


E ” Diskettes 
+ se | | LÊ ERRO 


um produto. 
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Pergunta — Peço informações sobre 
como ler um programa em linguagem 
de máquina para o CP-500 sem usar a 
instrução SYSTEM, e também como 
gravá-lo. (Carlos Augusto Biglia, BA) 
MICRO SISTEMAS — O CP-500 não 
permite que programas em linguagem 
de máquina sejam lidos sem o coman- 
do SYSTEM. Para a gravação em lin- 
guagem de máquina você pode usar o 
comando DUMP. 


Pergunta — Quantos caracteres (letras, 
número ou qualquer sinal gráfico) po- 
de conter 1 Kbyte? Em uma programa- 
ção BASIC (ou outra linguagem) exis- 
te alguma coisa que “consuma” memó- 
ria além das possíveis “respostas” do 
computador (respostas e dados, natu- 
ralmente)? (José Luciano Albuquer- 
que, PE) 

MICRO SISTEMAS — 1 Kbyte pode 
conter até 1024 caracteres, Com rela- 
cão ao “consumo” de memória, o pró- 
prio programa (seu código interpretá- 
vel) ocupa espaço. Além do programa, 
registros lidos ou a serem gravados em 
periféricos, dados diversos necessários 
ao sistema operacional, e a parte básica 
do sistema operacional também ocu- 
pam espaço de memória. 


Pergunta — Existe microcomputador 
do tamanho da palavra de 16 e 32 
bits? Quais? E na avaliação de um micro 
o que se deve considerar mais: 0 tama- 
nho da memória principal ou o tama- 
nho da palavra? (José Oswaldo Mar- 
ques, MG) 

MICRO SISTEMAS — No Brasil só 
existem, por enquanto, micros de 16 
bits, como o da empresa Sisco e o da 
Ego. Mas nos Estados Unidos existem 
micros de 16 e de 32 bits, sendo que 
este de 32 bits mantém-se fiel à estru- 
tura interna de um microcomputador, 
e aqui no Brasil os equipamentos com 
32 bits são considerados, por sua estru- 
tura e filosofia, como minicomputado- 
res. 

Deve-se considerar o tamanho da, 
memória, pois a palavra é apenas um 
método de se dividir a memória. 
Pergunta — Gostaria de saber se os pro- 
gramas oferecidos pela Microdigital 
podem ser rodados no CP-200. Em ca- 
so afirmativo, os jogos existentes pres- 
supõem que eu tenha joystick e gera- 
dor de som? 


O CP-200 vem com sinal sonoro de 
acionamento de teclas, podendo ser 
acionado por programa. Pergunto: 
assim sendo, o gerador de som é des- 
necessário ou o efeito sonoro para jo- 
on não rá satisfatório? Precisando do 

ibilidade de acoplá-lo 
rim con possível utilizar dois joys- 
ticks no microcomputador? (Victor 
Hugo A. Salomão, SP) 
MICRO SISTEMAS — Os programas 
da Microsoft, ou outra empresa qual- 
quer, oferecidos para o TK82-C po- 
dem rodar no CP-200 sem problema 
nenhum. Tanto o joystick como o ge- 
rador de som são opcionais, eles facili- 
tam e incrementam os jogos de movi- 
mento mas não são imprescindíveis. 

O bip do CP-200 não pode ser utili- 
zado como gerador de som, ele serve 
apenas para indicar o acionamento de 
uma tecla. Com relação ao joystick, é 
possível utilizar dois joysticks no com- 
putador. Se o micro não possuir duas 
tomadas, será necessário, então, uma 


pequena implementação na base do 
teclado. 


Pergunta — Tenho três dúvidas com re- 
lação ao Curso de Programação Sintéti- 
ca publicado em MS 12 a 15: 12) Co- 
mo é feita a “escovação de bits?” 28) 
Como é feita a programação bit a bit? 
2) O que é feito no programa sintéti- 
co em MS nº 15, página 72, do passo 
06 ao 13, principalmente os passos 08 
a 11? (Alexandre Nadalutti, SP) 
MICRO SISTEMAS — Escovação de 
bits é uma gíria usada pelos fanáticos 
da programação, pelos hobbystas. Prin- 
cipalmente quando essa programação 
não traz resultados práticos. O sinôni- 
mo mais próximo de “escovar bits” se- 
ria “entortar bits”, tarefa igualmente 
árdua, senão impossível. 

Programação bit a bit é a manipula- 
ção dos bits, através do uso das flags, a 
fim de formar os bytes integrantes da 
cadeia de instruções. 

Os passos 6 a 13 preparam o regis- 
trador c para leitura. Essa leitura é 
feita transferindo-se o conteúdo de c 
para d (cujo conteúdo também é con- 
servado) e lendo-o com o uso das flags 
do sistema. Os passos 8 e 11 colocam 
bytes auxiliares no registrador Alpha 
em modo APPOND, obrigando que o 
conteúdo anterior se desloque para a 
esquerda um número determinado de 
bytes (3 e 4 respectivamente). 


Pergunta — Tenho uma dúdiva quanto 
à adaptação de programas em BASIC 
Level | (TK82-C) para BASIC Level || 
(TRS-80). Como transformar a instru- 
ção PRINT ATX, Y;em PRINTZ,...? 
Eu possuo um Dismac D-8001. (Alfre- 
do Augusto T. Gallinucci, SP) 


MICRO SISTEMAS — A instrução 
PRINT AT X, Y do TK82-C pode ser 
substituída por: PRINT O X+(Y+64) 
no D-8000 ou nos similares ao TRS-80. 


Pergunta — Minha pergunta é apenas 
para elucidar-me com relação à instru- 
ção PAUSE do TK85. Tanto no ma- 
nual do TK85, quanto em um artigo 
publicado pela MICRO SISTEMAS nº 
21, página 60, é afirmado que, de acor- 
do com o padrão M, a duração da exi- 
bição de um quadro é de 1/60 segun- 
dos, ou seja, 60 quadros por segundo. 

Mas, se a frequência de varredura 
horizontal é de 1575 Hz (1575 linhas 
por segundo), e se temos um total de 
525 linhas horizontais (dois campos), 
que equivale a um quadro completo, 
conclui-se que temos 30 quadros por 
segundo (1575: 525) e 60 campos por 
segundo (30X2). 

Então, eu pergunto: como se expli- 

ca a instrução PAUSE do manual do 
TK85 (capítulos 19-1)? (Celso Rober- 
to Moraes, SP) 
MICRO SISTEMAS — A instrução 
PAUSE não depende da quantidade de 
quadros enviados à TV por segundo, e 
sim da quantidade total de quadros 
enviados pela rotina do display. Assim, 
PAUSE N significa que o processamen- 
to será interrompido e após N quadros 
ele será reiniciado (N quadros ou até 
que uma tecla seja pressionada). 

Tudo isso é comandado pela rotina 
do display, e a taxa de quadros por se- 
gundos apenas nos informa quanto 
tempo durará uma PAUSE N (descon- 
tando-se aí o tempo de processamento 
das rotinas envolvidas). 


Pergunta — Posso usar a impressora 
P-500 da Prológica com o D-8000, da 
Dismac, compatível com o TRS-80 
nível !. Como devo fazer para conec- 
tá-los? O que devo fazer para ampliar a 
memória do D-8000? (Valdemar Hen- 
nings, SC) 
MICRO SISTEMAS — Para conectar a 
impressora P-500 ao D-8000 é preciso 
ter a interface de impressora do D-8001. 
A memória do D-8000 pode ser, 
eletronicamente, ampliada. Mas a Dis- 
mac normalmente não vende a expan- 
são. 
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Revendedor BRASCOM 
Microcomputador BR1000M: 

1a 6 terminais MULTIUSUÁRIO 
De 2,4 a 384 Mb em-disco 
linpressoras de 100 CpS a 600 Lpm. 
SOFTWARE: Contabilidade, 
Administração de Pessoal, 
VENDA E RESERVA DE INGRESSOS 
Contas a receber/Pagar, 

OPEN MARKET, 

Faturamento e outros. 
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O futuro é hoje e nós esta- 
mos presente. 
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Linha Sinclair 
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NEZ8000 e CP-200 


SOFTWARE 
Jogos e Aplicativos 
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Sistemas Próprios 


URSOS 
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aulas práticas 
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programas 


BIREAUX DE 
SERVIÇOS 
Administração 
Contabilidade 
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No Recife, visite 
TELEVIDEO () 


O Lojão de Informática mais des- 
complicado do país! 

Micros, periféricos. suprimentos 
Software, Cursos, Livros e Revistas 
Componentes eletrônicos. peças & 
Som 














PREÇOS ESPECIAIS 
FINANCIAMENTO PRÓPRIO 
Compre pessoalmente ou pelo 

Reembolso 


TELEVÍDEO LTDA. 
R. Marquês de Herval, 157 
Tel.: (081) 224-8932, 
RECIFE, PE. 


(') Sr. Industrial: distribuímos s/ 
produto nas melhores condi 
ções: contatos em S. Paulo (011) 
223-5480. 








Assessoria e Programas 
para CP-500 


-APLICATIVOS 
=UTILITARIOS 
- JOGOS 


Solicite relação completa 
Tel. (011) 64-0847 


Caixa Postal 19059 
CEP 04599 São Paulo SP 


CURSO BASIC 


Turmas com 10 alunos 
Aulas práticas e teóricas 


Horários: 

manhã 8:30 hs às 10:30 hs 
tarde 14:00 hs às 16:00 hs 
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MATRICULAS ABERTAS 


hpanEMA Micro 


Rua Visc. de Pirajá, 540 1j 106 
22.410 Ipanema Rio RJ 
Tel. 259-1516 
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CNICA DE GRANDE PORTE. 
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* Microcomputadores: 
Microdigital, Prológica e Similares Apple 

* Micro Sistemas AIKO/CCE 

* Aulas de Basic 

* Calculadoras Sanio/Casio 

e Fitas e Diskettes 

* Monitores, Impressoras, Disk-drives, etc.. 

* Programas (fita/diskette) para todos os 
computadores contabilidade-aplicativos- 
jogos, etc. 
Personalização de programas para firmas e 
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* Jogo Odissey/Dactari 
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CIÊNCIA DOS 
COMPUTADORES 


Uma Abordagem Algorítmica 


TREMBLAY, J. P. 
e BUNT, R.8. 
CIÊNCIA DOS 


COMPUTADORES, JEAN-PAUL TREMBLAY 


RICHARD B. BUNT 


o a 
Editora McGraw-Hill, | Es: 
Cr$ 3.700,00 (dez/83) [NM mera 


Este é um livro importante para os iniciantes em pro- 
gramação e análise, que pretendam aperfeiçoar seus co- 
nhecimentos sobre algoritmos. O livro apresenta aplica- 
ções e exercícios de forma a cobrir uma larga faixa de in- 
teresses, incluindo a computação científica, o processa- 
mento comercial, aplicações em Engenharia, os proble- 
mas sociais e os tópicos de interesse geral. 

Todos os capítulos, exceto o primeiro, contêm exem- 
plos cuidadosamente trabalhados, nos quais o material 
apresentado é aplicado à solução de problemas práticos. 
O enfoque está na resolução rigorosa e sistemática de 
questões através da utilização de algoritmos, tanto os nu- 
méricos quanto os não numéricos. Considerável atenção 
é dada às estruturas de dados, apropriados a cada aplica- 
ção particular. 

As construções sintáticas da linguagem algorítmica, 
ao invés de serem apresentadas todas de uma só vez, são 
dadas ao longo do livro, para atenderem às novas exigên- 
cias que forem surgindo. 

O primeiro capítulo é uma breve visão histórica do 
desenvolvimento dos computadores e de sua programa- 


O capítulo dois pode ser visto como a verdadeira in- 
trodução do livro. Apresenta diversos conceitos funda- 
mentais de computação e ainda as primeiras construções 
sintáticas da linguagem algorítmica. 

A noção de fluxo de controle é introduzida no capí- 
tulo três, com duas estruturas fundamentais de controle:' 
a seleção de ações alternativas e o laço. 

No capítulo quatro é abordado o conceito de conjun- 
to, abrangendo os unidimensionais e os demais. 

O capítulo seis trata de funções e procedimentos. Os 
tópicos discutidos incluem a correspondência entre argu- 
mentos e parâmetros, a forma como funções e procedi- 
mentos são chamados e, ainda, os valores retornados. 

O estilo na programação é o tópico do capítulo sete, 
que inclui considerações sobre a qualidade dos progra- 
mas, a programação defensiva, o gerenciamento da com- 
plexidade, a preparação de programas legíveis, a progra- 
mação por abstração/refinamento e a programação co- 
mo uma atividade humana. 

O oitavo capítulo oferece uma introdução ao estudo 
de estruturas lineares de dados. São discutidas estrutu- 
ras simples, como listas lineares, pilhas e filas e também 
operações com estas estruturas. 
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Descubra os segredos do comando LAST do CP/M, saiba como utilizá-lo 
e economize tempo e... disquetes. 








LAST: comando zero do CP/M 


João Henrique Franco 


ocê acabou de digitar um enorme programa em BA- 
SIC e agora irá salvá-lo. Antes, porém, você quer tro- 
car o disquete. Um pouco distraído, você se esquece 
de avisar ao CP/M, através do comando RESET, que foi trocado 
o disco. Então, quando você digita o comando SAVE, para sua 
surpresa, o CP/M emite a seguinte mensagem: 





BDOS error on B: R/0 


Pois é, as informações do diretório que estão na memória 
ainda são as do disquete anterior, e mais, você não poderá es- 
crever neste disquete e deverá voltar ao CP/M. Parece que suas 
longas horas de trabalho foram desperdiçadas... Mas nem tudo 
está perdido. Relaxe, tenha calma e chame o programa LAST. 
Ao digitar: 


AJLAST(cr) 


o CP/M, como que por encanto, ativará novamente o BASIC, 
recuperando todo o trabalho perdido. Se não acreditar, tente 
LISTar seu programa. Pronto, agora basta salvá-lo. 

Imagine que, desta vez, você quer alterar o nome de um ar- 
quivo R/O (read-only) de XPTO.BAS para MMDC.BAS, con- 
servando ainda a condição R/O. É claro que você vai usar o 
STAT, outro utilitário do CP/M. Mas apenas uma vez! Nova- 
mente entra em ação o LAST e pronto, missão cumprida antes 
do prazo. Veja: 


AJSTAT XPTO.BAS SR/W(cr) 
XPTO.BAS set to R/W 
AJREN MMDC.BAS=XPTO.BAS(cr) 
AJLAST MMDC.BAS SR/O(cr) 
MMDC.BAS set to R/0 
A) 
O mesmo acontece quando você tem que editar, sucessiva- 
mente, vários arquivos, utilizando, por exemplo, o editor pa- 


drão do CP/M, o ED. Fica evidente, mais uma vez, a utilidade 
do LAST: 


AJED PDS.FOR(cr) 
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Então, não podendo mais conter sua curiosidade, você vai 
querer examinar mais de perto esse incrível utilitário LAST, 
querendo saber, por exemplo, seu tamanho. Para isso, vamos 
usar novamente o STAT: 


AJSTAT LAST.CON(cr) 

Recs Bytes Ex Acc d:filename.typ 
0 OK 1 R/W A:LAST.COM 
Bytes remaining on A: 10K 


A) 


Incrível, o programa LAST não contém nada! Como é pos- 
sível que ele faça algo de útil? Para descobrir o segredo é pre- 
ciso recapitular o processo de ativação de programas pelo 


CP/M. 
CONHECENDO O LAST 


Quando o CP/M recebe um comando do tipo Residente 
(DIR, ERA, REN, TYPE, SAVE e USER) o programa corres- 
pondente já está em memória, mais precisamente no CCP 
(Console Command Processor), que é a interface entre o CP/M 
e o usuário, e neste caso o CP/M precisa apenas ativá-lo. 

Por outro lado, caso o comando seja do tipo Transiente, o 
CP/M irá procurar no disquete indicado (ou no disquete de- 
fault) um arquivo de mesmo nome que o comando fomecido 
e de extensão COM. Encontrando-o, o CP/M irá carregá-lo na 
Área Transiente de Memória (TPA) e em seguida ativá-lo, 
através de uma instrução CALL, para o endereço 100 hexade- 
cimal (endereço inicial da TPA). 

Agora é fácil entender como é que o nosso LAST funciona. 
Quando o CP/M, após receber o comando LAST, encontra o 
arquivo LAST.COM no disquete, verifica também no seu 
FCB (File Control Block — descritor do arquivo) que o núme- 
ro de setores (records) que devem ser carregados em memória 
é ZERO. Então, nada mais a fazer, o CP/M acaba ativando, 
sem saber, O programa Transiente ativado anteriormente, que 
estava na TPA, sem modificá-lo. 

Bem, antes que você pergunte, aí vai a receita para se criar 
o LAST, que é mais fácil do que parece: 


AJSAVE O LAST.COM(cr) 
A) 


Para finalizar, três dicas importantes. A primeira delas é 
que o LAST não reativa os comandos Residentes, pois estes 
são carregados na TPA. De qualquer modo, não é tempo per- 
dido carregálos, pois eles já estão em memória. A segunda, é 
que você deve ter atenção para com o uso do LAST em progra- 
mas que se auto-modificam, como o Depurador Padrão do 
CP/M, o DDT. Este, uma vez carregado na TPA e ativado, 
reloca-se para a área de memória logo abaixo do BDOS (BASIC 
Disk Operating System), deixando a TPA livre para que outro 
programa (qual?) seja carregado. Por último, é preciso ter cui- 
dado ao usar o LAST para reativar programas extensos, que 
geralmente fazem uso de overlays, como compiladores, por 


exemplo. 
Fica no ar, ainda, uma dúvida: será o LAST um comando 
Transiente, Residente, ou nenhum dos dois? = 





Jogo Henrique de A. Franco é Engenheiro Eletrônico, formado pela Es- 
cola Politécnica da USP e cursou o CEAG da Fundação Getúlio Vargas, 
na área de Pesquisa Operacional e Informática. Atualmente é Engenhei- 
ro do Projeto Trópico-RC no CPqD da Telebrás. 
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MICROARTE SOFTWARE S/C LTDA. 


* GRAFI-SÉRIE - 

* MLOGO - linguagem 

* COPIARTE - sistema de cópias 
E muitos outros. 

Garantia e assistência total. 


MICROARTE SOFTWARE S/C LTDA. 
Rua Coronel Mello de Oliveira, 763 
Tel.: (011) 263-6285 


* EDITEX - processador de textos 
* MICRODATA - banco de dados integrado 
gráficos 








A popularização da Informática e uma reflexão sobre o presente e o futuro 
do setor são os principais temas em debate no Informática 83. 





INFORMÁTICA 83: 
o computador a serviço 


da sociedade 


Informática no Brasil: estágio 
A atual, efeitos da crise e rumos 

futuros, aleín da crescente po- 
pularização do computador na socieda- 
de brasileira são os principais temas do 
XVI Congresso Nacional de Informáti- 
ca/III Feira Internacional de Informáti- 
ca. O evento reunirá, de 17 a 23 de ou- 
tubro, no Parque Anhembi, em São Pau- 
lo, personalidades políticas do Brasil e 
do exterior, empresários, técnicos, pro- 
fissionais liberais, estudantes e leigos, 
em torno de mais de 270 temas ligados 
ao assunto. 

Este ano, além das sessões plenárias, 
especiais, técnicas, de estudantes, expo- 
sições e painéis, o XVI CNI realiza tam- 
bém sete mini-cursos de computação, 
destinados a profissionais liberais de di- 
versas áreas que desejem conhecer esta 
tecnologia e incorporá-la ao seu dia-a- 
dia. Um “Curso Popular de Microcom- 
putadores” para 3 mil e 500 participan- 
tes irá divulgar os segredos da micro- 
informática e sua aplicação no lar, nas 
escolas, nas pequenas e médias empre- 
sas, nas profissões liberais etc. 


SESSÕES PLENÁRIAS 
A sessão solene de abertura do Con- 
gresso contará com a presença do Mi- 


nistro Danilo Venturini e no encerra- 
mento estarão presentes o Presidente 
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Figueiredo e o Governador de São Pau- 
lo, Franco Montoro. 

As sessões plenárias terão como te- 
ma: “Política de Informática”, “Infor- 
mática na América Latina”, “Informáti- 
ca e o Emprego”, “Informática e o Sa- 
télite”. As sessões serão sempre das 
11:00 h às 12:45 h, abertas a todos os 
participantes do Congresso. 

As sessões especiais serão compostas 
de conferências sobre “O Impacto dos 
Microcomputadores”, “Sociedade Infor- 
matizada e Escritório do Futuro”, e 
por painéis onde serão discutidos diver- 
sos assuntos como “A Informática e o 
Crime”, “Impacto da Automação na So- 
ciedade”, “O Desenvolvimento da Tec- 
nologia”, entre outros. 

Ainda dentro dessas sessões serão rea- 
lizados eventos especiais, tais como o II 
Encontro Latino Americano de Usuá- 
rios de Informática (de 17 a 19); 0 II Se- 
minário de Biblioteconomia e Informá- 
tica (de 17 a 21, no Centro de Conven- 
ções Rebouças); o Seminário sobre In- 
formática e Energia, com a presença do 
Prof. José Goldemberg, presidente da 
CESP (dia 18); Seminário sobre Tele- 
mática (dias 20 e 21); e Seminário so- 
bre Auditoria de Sistemas (de 17 a 21, 
na Prodesp). 

Nas sessões técnicas serão apresenta- 
dos trabalhos sobre temas atuais relacio- 
nados à Informática. Dos 220 trabalhos 


inscritos, dois serão premiados com uma 
viagem ao NCC ou ao Sicob. As pales- 
tras especiais para estudantes abordarão 
aspectos técnicos e aplicativos da Infor- 
mática a serviço da sociedade. 


ATRAÇÕES ESPECIAIS 


Num mini-circo montado no Anhem- 
bi, o pessoal de sete a 16 anos poderá 
conhecer os mistérios do mundo da In- 
formática. Serão oito sessões com a uti- 
lização dos micros AP II, da Unitron, na 
linguagem LOGO e não faltarão, nem 
mesmo, os palhaços de um circo de ver- 
dade. As sessões serão acompanhadas 
por psicólogos, educadores e assistentes 
sociais. À noite, O circo será ocupado 
por artistas que darão shows de música 
com sons obtidos através do computa- 


dor. 

A III Feira Internacional de Informá- 
tica, paralela ao Congresso, além de dar 
uma visão do atual estágio da indústria 
de Informática, também será uma atra- 
ção à parte. Este ano, o evento surpre- 
endeu seus organizadores com um total 
de 20 mil m? totalmente vendidos. Mais 
2 mil m? de Feira estão reservados para 
as Universidades e Entidades de Pesqui- 
sa. Neste local também ocorrerá a I Mos- 
tra de Artes Computacionais, onde ar- 
tistas brasileiros mostrarão a sua criati- 
vidade com o uso do computador. 
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oa DANCING DEMON 
Sysdata 

Você só descobre o quanto precisa de um Micro-Com- Microcomputador pessosi 
putador JR da Sysdata depois que o conhece de perto. 

Você vai ter certeza de que fez um ótimo negócio ao 
adquirí-lo assim que o colocar na sua empresa ou na sua 
casa. 

OJRdasS ta é rápido, é versátil, é compacto. 
APLICAÇÕES: 

Contabilidade, controle de contas a pagar, controle de 
contas a receber, folha de pagamento, controle de esto- 
que, controle de clientes, relatório de clientes, mala direta, 
cálculos de orçamentos financeiros,controle de processos 
industriais, cálculos de engenharia, cálculos de estatísti- 
cas, funções matemáticas, funções lógicas em cadeia de 
caracteres (STRINGS), gráficos, jogos animados, progra- 
mas educacionais. 

O JR PERMITE AINDA: 

O acesso a grandes sistemas de computação, a comuni- 
cação entre os departamentos de Empresa, efetuar pro- 
gramas específicos para cada Empresa. 

E, como se nãobastasse, ele é o Micro-Computador de 
menor preço do mercado. 

Com todas as qualidades que tem, o JR da Sysdata nem 
precisava ser tão econômico. Mas é. 

Afinal, ele é o mais completo Micro-Computador de sua 





Rus Jorge Duprat Figueiredo, 647 - 
À S sdafta Vila Santa anta São Poe SP aca 

Inclusive no preço. b UUGU VOU Fomos: 542.112 - 531-0990 - 531.0410 

Você pode testar estas e outras qualidades do JR em Ce  Tejex (011) 23579 





qualquer dos nossos revendedores. 





REVENDEDORES: SÃO PAULO: Capital - AD-Data = 864.8200 - ADP System = 227-6100 - Bucker = 881-7995 - Compushop = 212-9004/210-0187 - Compute = 
852.8290/257-3952 - Computeriand = 258-3954/1573 - Foto Léo = 35-7131 - Guedes = 289-9051 - Interface = 852-5603 - Lema = 210-5929 - Mappin = 
258-4411/258-7311/9358 - Microrei = 881-0022 - Microshop = 852-5603 - Miprotec = 289-4941 - Plantel = 543-9653 - Runners = 68-3779 - Sacco = 814-0598 

Servimec = 222-1511 - Sistemac = 282-6609 - Sos = 66-7656 - Campinas - Computer House = (0192) 852-5855 - Microtok = (0192) 32-4445 - São José do Rio 
Preto - Compusys = (016) 635-1195- Seno = (018) 32-0600 - Mogi Guaçu - Guaçumag = (019) 261-0236 - Taubaté - Ensicom = (0122) 33-2252 - PERNAMBUCO - 
Recife - Elogica = (080) 241-1162/241-1149 - GOIÁS - Golânia - Casa do Micocomputador = (062) 223-1165 - Grupom (062) 225-8226 - MATO GROSSO DO SUL - 
Campo Grande - DAL = (067) 382-6487 - Video Computadores = (067) 321-4220 - BRASÍLIA - Capital - Compushow = (061) 273-2128 - Digitec = (061) 225-4534 

RIO DE JANEIRO - Capital -Clap = (021) 288-0734/284-5649 -Computique = (021) 267-1083 - Kristian = (021) 252-9057. - Micromaq = (021) 222-6088 - Petrópo- 
lis - Foto Ótica = (0242) 42-1393/43-6120 - PARANÁ - Londrina - Shop Computer = (0432) 23-9674 - Umuarama - CBM Comercial = (0446) 23-2233 - Curitiba 

Micro System = (041) 232-3533 - Ponta Grossa - Grupo Data Memory = (0422) 24-6191 - PARAÍBA - João Pessoa - Medusa = (083)221-6743 CEARÁ - Fortaleza 

Siscomp = (085) 244-4691 - MINAS GERAIS - Belo Horizonte - Compucity = (031) 226-6336 - Kemitron = (031) 225-0644 - Pró Informática = (031) 337-8792 

SANTA CATARINA - Blumenau - Projesul = (0473) 22-3848 - Florianópolis - Castro = (0482) 22-6933 - Infotec = (0482) 23-4777 - RIO GRANDE DO SUL - Novo 
Hamburgo - Micromega = (0512) 93-4721 - Porto Alegre - Advancing = (0512) 26-1194/26-0194 - Digital = (0512) 40-1998/24-1411 - Microsis = (0512) 22-9782 

Sistematica = (0512) 21-0732/21-0835 











Lendo este artigo, você saberá quais são as características 
do CP/M e os requisitos de hardware necessários à sua implantação 


O queéoCP/M? 


CP/M — do inglês Control Pro- 

gram for Microcomputers, e 

para nós Programa de Controle 
para Microcomputadores — foi concebi- 
do por um grupo de programadores da 
Microcomputers Applications Associates 
(MAA) como um sistema operacional de 
base ao compilador PL/M, desenvolvido 
por eles mesmos para a Intel Corpora- 
tion (criadora do microprocessador 
8080). Todavia, esta não mostrou inte- 
resse, pois usariam o PL/M em compu- 
tadores de grande porte. 

Mas o grupo do MAA, acreditando 
que o CP/M simplificaria o desenvolvi- 
mento de sistemas utilizando micro- 
processadores, uma. vez que grande par- 
te do tempo de projeto era perdido na 
definição e implementação de um pro- 
grama para gerenciamento de disquetes, 
continuou a desenvolver o sistema ope- 
racional de forma que pudesse ser ins- 
talado em qualquer equipamento basea- 
do no 8080 ou compatíveis (Z80 e, 
depois, 8085), abrangendo, portanto, a 
grande maioria dos micros disponíveis 
no mercado daquela época (meados dos 
anos 70). 

E é justamente esta portabilidade que 
permite ao projetista dispender menos 
tempo com a implantação do sistema 
operacional e dedicar-se integralmente 
ao seu sistema. Esse fato, associado ao 
de ser o primeiro sistema operacional de 
8 bits e devido a várias casas de software 
terem acreditado nele, desenvolvendo 
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diversos programas que o utilizavam, ele 
foi rapidamente bem aceito, e hoje é di- 
fícil encontrar um fabricante de micro- 
computador que não ofereça compati- 
bilidade com o CP/M. 


DESCRIÇÃO DO CP/M 


Podemos observar, no diagrama da fi- 
gura 1, que o CP/M é dividido em três 
partes. Esta representação, por razões 
óbvias, é chamada de casca de cebola, 
o que significa que cada nível interage 
somente com o nível imediatamente n- 
ferior (nível interno), solicitando a exe- 
cução de alguma função. Vejamos en- 
tão quais são as tarefas executadas em 
cada um dos níveis. 





Figura 1 — Estrutura do CPIM 


e BIOS (BASIC Input/Output System 
— Sistema Básico de Entrada e Saída). 

Este módulo é responsável pela inter- 
face do software com o hardware. É ne- 
le que estão localizadas as rotinas de 
acesso aos periféricos do sistema res- 
ponsáveis pela interação com o hard- 
ware, possibilitando ler um caráter do 
teclado, escrever um caráter na impres- 
sora ou efetuar a leitura de dados de um 
disquete. 

Este é o único módulo dependente 
do hadware e, portanto, escrito pelo 
projetista do sistema. As rotinas existen- 
tes são: 


1) Rotinas do console: 

— leitura de caráter do teclado; 

— saída de caráter para o terminal; 

— estado do teclado, informando se 
existe ou não caráter disponível. 


2) Rotinas da impressora: 

— saída de caráter para a impressora; 
— estado da impressora, informando se 
a impressora está pronta para receber 
um novo dado. 


3) Rotinas do disco: 

- seleção do endereço do registro na 
memória; 

— seleção da unidade; 

— seleção da tnilha; 

— seleção do setor; 

— operação de leitura; 

— operação de gravação. 
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Neste mesmo módulo, o usuário n- 
forma ao BDOS o tipo de disco utiliza- 
do (fornecendo o número de trilhas, de 
setores por trilha e se é removível ou 
não) e o número de entradas permitidas 
no diretório. 

e BDOS (BASIC Disk Operating Sys- 
tem — Sistema Básico de Operações em 
Disco) 

Este é o módulo responsável por criar 
no disco a estrutura de arquivos. Ele ge- 
rencia a distribuição e alocação das in- 
formações, fazendo com que os progra- 
mas acessem estas informações sem se 
preocuparem em que trilha e setor do 
disco está O registro desejado. O BDOS 
interage com o BIOS para executar as 
operações solicitadas pelo aplicativo do 
usuário. 

As funções reconhecidas por este mó- 
dulo são: 

— procura de arquivos no diretório; 

— criação e supressão de arquivos; 

— permissão para que um programa uti- 
hze um arquivo (Open); 

— término de uso do arquivo (Close): 


*— leitura e gravação de registros do ar- 


quivo. 

Embora não sejam funções de opera- 
ção em disco, o BDOS reconhece ainda 
as funções de tratamento de impressora 
e console. Desta forma, um programa 
não precisará recorrer ao BIOS para se 
utilizar desses periféricos mantendo, 
portanto, uma estrutura modular. 

Agora vejamos como é feito o tra- 
tamento lógico dos arquivos. Um arqui- 
vo é constituído de registros de tama- 
nho fixo, com 128 bytes, guardados em 
blocos. O número de registros por blo- 
co, que também é fixo para um dado 
disco, é definido nos parâmetros de espe- 
cificação de disco existentes no BIOS, po- 
dendo assumir os valores 8, 16,32 ou 64. 

Associado ao arquivo há um código 
chamado USER, o qual pode variar de 
O a 15. Sua função é permutir que so- 
mente os usuários que conheçam o có- 
digo de um determinado arquivo possam 
ter acesso a ele. À primeira vista, este re- 
curso parece não ter muito sentido, já 
que o CP/M é mono-programável (ape- 
nas um usuário de cada vez pode fazer 
uso do sistema e não existe o conceito 
de “palavra segredo” associado ao 
USER); no entanto, USER serve para di- 
vidir o disco por tarefas, de forma que 
quem estiver lidando com uma não in- 
terfira nos arquivos de outra. Esta ca- 
racterística, incluída nas versões poste- 
nores à 2.0, existe também para manter 
a compatibilidade dos arquivos com o 
sistema multiusuánio MP/M, irmão 
maior, porém mais recente, do CP/M. 


e CCP (Console Command Processor — 
Processador de Comandos da Console) 

Este é o módulo mais externo, aque- 
le que utiliza o BDOS para interagir 
com o operador e executar os comandos 
solicitados. 
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Figura 2 — Distribuição do CP/M na memória 


Existem duas classes de comando: os 
que são executados pelo própio CCP e 
batizados de comandos intrínsecos; e os 
que ocasionam a carga de um programa 
que esteja em disco para a memória e 
postenor início de execução. Estes são 
chamados de comandos transientes. 


Os comandos intrínsecos são : 
1) DIR — Fomece o índice dos arquivos 
que estão no disco. 
2) ERA — Suprime arquivos do disco. 
3) TYPE — Mostra o conteúdo dos ar- 
quivos. 
4) SAVE — Guarda a imagem da memó- 
ria em um arquivo. 
5) REN — Altera o nome de um arqui- 


vo. 
6) USER — Define a classe de utilização 
dos arquivos pelo usuário. 


A figura 2 mostra como o CP/M se 
distribui na memória de um sistema. Co- 
mo pode ser observado, além da restn- 
ção do microprocessador — que deve sa- 
ber executar instruções 8080 — é neces- 
sánio que exista memória de leitura/gra- 
vação (RAM) a partir de 0000. 


A página inicial de memónia, que 
compreende os 256 bytes localizados 
entre 0000H e O0FFH, é reservada para 
o CP/M e contém, entre outras coisas, o 
ponto de enfrada para o início do Siste- 
ma Operacional, denominado pulo in- 
condicional (JMP), o qual corresponde à 
posição mais infenor do BDOS. 


Através deste parâmetro, os progra- 
mas podem calcular o espaço de memó- 
na disponível e utizálo de forma efi- 
ciente (é bom lembrar que o CP/M não 
possui gerenciamento de memónia). 


Cabe amda observar que, ao ser ini- 
ciada a execução de um comando tran- 
siente, torna-se desnecessária a presença 
do CCP na memória e, portanto, esta 
área pode ser utilizada para trabalho. 


» Área disponível aos 
programas transientes 








CONCLUSÃO 


O presente artigo não tem como ob- 
jetivo ensinar a um usuário como fazer 
uso do CP/M, mas sim fomecer uma vi- 
são geral sobre este Sistema Operacio- 
nal que é muto popular graças à simph- 
cidade com que pode ser instalado em 
um hardware que obedeça às restrições 
até aqui descritas. Além disso, existe 
uma infinita quantidade de programas 
já desenvolvidos para ele, tais como 
compiladores, processadores de texto e 
banco de dados. 


Segundo a filosofia do artigo, as in- 
formações necessárias para o desenvolvi- 
mento de um programa que utilize os re- 
cursos do CP/M foram omutidas, mas po- 
dem ser obtidas através de uma consulta 
aos manuais “CP/M Interface Guide” e 
“CP/M User's Guide”, que contêm in- 
formações sobre o formato dos coman- 
dos, seus parâmetros e áreas de dados 
necessárias. 
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Vista sua farda, assuma o lugar do Capitão Kirk e pode ir dando 
as primeiras ordens ao Sr. Spock. Vai começar a Jornada nas Estrelas, no TK82-C 





Jornada nas Estrelas 


ocê está no comando da espa- 
V çonave Enterprise e recebe or- 
dens de limpar a Galáxia de 


Klingons, seus inimigos mortais. A Ga- 
láxia consta de 64 Quadrantes e as espa- 
çonaves inimigas estão escondidas nestes 
Quadrantes, ameaçando as Bases Estela- 
res. 

Você só tem um certo número de 
dias para executar a tarefa e dispõe dos 
seguintes comandos: 

D — Diário de bordo. Indica o núme- 
ro de dias que faltam, a energia disponí- 
vel, os torpedos que ainda não foram 
disparados, os Klingons abatidos e os 
que faltam, o número de pontos que vo- 
cê já fez e demais dados de interesse do 
capitão. 

Q — Apresenta todos os dados do 
Diário, acrescidos de um mapa do Qua- 
drante. 

R — Apresenta uma visão dos Qua- 
drantes circunvizinhos ao seu, na forma 
de três números (103, por exemplo), 
onde: 

* o primeiro dígito indica o número de 
Klingons no Quadrante; 

* o dígito do meio indica o número de 
Bases no Quadrante; 

* o último dígito indica o número de 
Estrelas no Quadrante. Este dado é im- 
portante porque a força das naves Klin- 
gons é proporcional ao número de es- 
trelas existentes no Quadrante: quanto 
mais estrelas houver no Quadrante, 
mais resistentes e ameaçadoras serão as 
naves Klingons lá escondidas. 

Se no lugar dos números aparecerem 
três asteriscos (* * *), isto significa que 
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você está no limite da Galáxia e que este 
Quadrante não pertence a ela. 

B — É a Biblioteca da espaçonave. 
Toda vez que você entra num Quadran- 
te, os dados relativos a ele passam a fa- 
zer parte do arquivo da Biblioteca, po- 
dendo ser consultados a qualquer mo- 
mento. Além disso, cada vez que você 
pesquisa os Quadrantes circunvizinhos 
(R) os dados destes Quadrantes também 
vão para o arquivo. Os Quadrantes ain- 
da não pesquisados ou visitados apare- 
cem na Biblioteca na forma de asteris- 
cos (*5*). 


N — Navegação. A espaçonave Enter- 

prise se movimenta na Galáxia através 
de coordenadas (IJ, onde I=linha e 
J= coluna) e com velocidade propor- 
cional à força. aplicada no Wrap, que 
movimenta a nave a uma velocidade su- 
perior à da luz. Naturalmente, quanto 
maior a velocidade, menos dias serão gas- 
tos na viagem e mais energia da nave se- 
rá consumida. 
Se você estiver no mesmo quadrante de 
uma base estelar e apertar N, o progra- 
ma perguntará se você quer entrar em 
órbita (a única forma de se efetuarem 
reparos e o abastecimento da nave), com 
o comando O, ou mudar de quadrante, 
com M. 

C — Combate. É quando você decide 
enfrentar os Klingons. Nem sempre você 
é o primeiro a atacar,e quando você é 
atacado o programa lhe coloca duas 
opções: F para fugir e D para se defen- 
der e tentar continuar o combate. Para a 
defesa, você é obrigado a desviar alguma 
força para os escudos e... rezar. Durante 


todo o tempo do combate, o estado das 
defesas tanto da Enterprise quanto dos 
Klingons fica visível (o normal é 1). 
Quando surgir uma oportunidade de ata- 
que, você terá duas opções: usar os faso- 
res (F), que gastam energia da nave para 
atingir o adversário com jatos de força, 
ou os torpedos (T), que são em número 
reduzido, embora não consumam ener- 
gia e tenham praticamente o mesmo 
efeito dos fasores. Você poderá ainda re- 
tirar-se (R), no momento propício a um 
ataque, caso considere esta uma boa 
opção estratégica. 

Um combate termina quando um dos 
lados tem sua(s) nave(s) destruída(s) ou 
quando a Enterprise consegue fugir. 


A — Relatório de Avarias. É muito 
útil, principalmente se você desejar via- 
jar em velocidade ultraluz com gerado- 
res avariados ou fazer uso da Biblioteca, 
que pode estar com seus dados trocados. 
Além disso, o próprio Relatório de Ava- 
nas pode ser atingido e você só saberá o 
ad está ou não funcionando na hora 


É bom hábito de jogo consultar o Rela- 
tório de Avarias sempre após um com- 
bate. 


S — Permite gravar o jogo com todos 
os dados daquele momento para uma 
continuação posterior. 


X — Rendição incondicional. A pon- 
tuação é fomecida e outro herói é con- 
vidado para assumir o comando da En- 
terprise em novas batalhas. 

Agora vamos apresentar algumas notas 
sobre o programa. Utilizei alguns expe- 
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dientes para economizar memória. O 
programa normalmente caberia em 16 
Kb, mas, com a economia, mais memória 
fica disponível para o acréscimo de novos 
comandos, opções ou sofisticações. 
(Convido os leitores a aprimorarem o 
programa e introduzirem modificações 
no jogo, pois não tive tempo de real- 
mente estudar todas as possibilidades. 
Acredito que tanto o Combate como a 
Navegação podem ser substancialmente 
melhorados.) 

Notadamente, utilizei letras em vez 
de números e abusei da utilização da 
função VAL, que economiza alguns by- 
tes. (Todas as variáveis estão definidas 
entre as linhas O e 160). 

Para entender o programa, o seguin- 
te roteiro de linhas pode ser acompa- 
nhado: 

— As linhas 170 a 610 inicializam o 


jogo. 
— As linhas 625 a 750 desenham o ma- 


pa do Quadrante. 
— As linhas 800 a 869 definem o for- 


mato da tela que irá acompanhar o jo- 


go inteiro. 

- As linhas 1000 a 1015 distribuem o 
jogo. 

— Na linha 5000 começa a rotina de 
Navegação (N). 


— Na linha 5110 começa uma sub-roti- 
na de proteção. 

— Na linha 5500 começa a rotina de 
pesquisa nos Quadrantes circunvizinhos 
(R). 

— Na linha 6000 iniciam-se as rotinas 
do Diário (D) e do Quadrante (Q). 

— Na linha 6500 começa a rotina C de 
combate. Os parâmetros que definem a 
luta dependem de uma série de fatores, 
como energia, número de Estrelas, nú- 
mero de Klingons, número de Bases, 
dias que faltam para executar a tarefa, o 
estado de defesa dos Klingons, o estado 
de Avarias da Enterprise e finalmente, 
como não podia deixar de ser, um fator 
randômico. É formada uma equação, 
cujo resultado (RC) determina a sorte 
do combate. 
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| Super Star Trek — Jornada nas Estrelas | 


REM [SUPER STARTREK) KJM 
LET N=VAL "0" 

LET A=VAL "1" 

LET B=A+A 

LET C=A+B 

LET D=B+B 

LET E=C+D 

F=D+D 

G=C*C 

LET H=G+A 

K=D*D 

L=F*C 

T1=H 

Pp 
Cl=N 
T=D+A 
El=VAL 
M=H*H 
P=VAL 
R=B/H 
Q=R/B 
SS=VAL 
ST=VAL 
TT=VAL 


nn 
NrovoJanaunHo 
| 
|] 
[e] 


“w 
[5 
m 
[e] 





pr 
as 
po 
Bm 
RE] 


"3000" 


no+ 
Sw 
[38 5) 
[ez] 
3H 


"g5s" 


NINO 
vn 
pre 
tg tg ty 
oc Rec Re] 


"9600" 
"9700" 
"9750" 
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LET 
LET 
LET 
LET 
LET 
LET 

45 DIM 

100 FOR I=A TO G 

105 LET U(I)=A 

110 NEXT I 

153 DIM QS(F,K) 

154 LET D$="VERDE” 

155 LET E$= 

156 LET C$="CONDICAO " 

157 LET B$="AMARELA” 

158 LET A$="DSNROCABX" 
| 170 CLS 
| 200 GOSUB SS 

205 GOSUB ST 

206 PRINT “SEU NOME, 
207 INPUT X$ 


o 
o 





wo 
Sw 


CE=A 
CC=vAL 
Z=VAL 
U(G) 


w 
par 


"ses" 
"5110" 


ww 
wu 


CAPITAO?" 


210 PRINT AT H+A,N;"CAPITAO: SR 
“;X$;" E 
| 211 PRINT 
SPOCK" 1 + 


"PRIMEIRO OFICIAL: SR 





MICRO SISTEMAS, outubro/83 








RXARERARARE 


212 pRINT "EEEEEEEEEEEEEEEEEEES | 
213 PRINT ,, "AGUARDE AS SUAS OR | 


DENS, CAPITAO." 

214 PAUSE M*D 

300 DIM V(H,H) | 
310 DIM Q(H,H) 

460 LET KI=INT (RND*L)+H 

461 LET K0=K1 

462 FOR I=A TO Kl 

463 LET X=B+INT (RND*F) 

464 LET Y=B+INT (RND*F) 

465 IF Q(X,Y)>=D+M THEN GOTO VA 
L "463" 

466 LET Q(X,Y) =Q(X,Y) +M 

467 NEXT I 

500 LET BI=INT (RND*H)+B 

501 FOR I=A TO Bl | 
502 LET X=B+INT (RND*F) | 
503 LET Y=B+INT (RND*F) 

504 IF Q(X,Y)-(INT (Q(X,7)/M)* 


M=H*B+A THEN GOTO VAL "502" 





505 LET Q(X,Y) =Q(X,Y)+H 

506 NEXT I 

525 FOR I=B TO G 

526 FOR J=B TO G 

527 LET Q(I,J)=Q(I,J) +C+INT (RN 
D*E) 

528 NEXT J 

529 NEXT I 

550 LET DI=(INT (RND*D) +A+K1) *H 
551 LET QI=INT (RND*F)+B 

552 LET Q2=INT (RND*F)+B | 
553 LET DO=D1 ! 
600 PRINT AT K-A,N; “EIS AS ORDE | 
NB: ,o" 


ENTERPRISE DEVE DESTRU 
IR ";K1,"ESPACONAVES KLINGON EM 
";Dl;” DIAS.” 

601 PRINT ” PARA O REABASTECI 
MENTO HA ";Bl,"BASES ESTRELARES. 
APERTE 5 CASO ESTEJA PRONTO E B 
OA SORTE...” 

605 PAUSE CC 

609 IF INKEY$<>"S” THEN GOTO VA 
Eoçoso —— Sos 

620 REM [FORMACAO DO QUADRANTE 
625 FOR I=A TO F 

630 LET Q$(I)="..... 0. Ê 

635 NEXT I 





Na linha 6560 é dada a notícia do de- 
saparecimento da Enterprise. 

- Na linha 8000 inicia-se a rotina de 
Avarias. 

— Na linha 8500 inicia-se a rotina da 
Biblioteca. 

— Na linha 9000 iniciase a rotina da 
desistência. 

— Na linha 9500 inicia-se a rotina que 
imprime a lista de todos os comandos 
automaticamente toda vez que o capitão 
apertar uma tecla errada. 

Na linha 9600 está o desenho da En- 
terprise que aparece no início do pro- 
grama. 

— Na linha 9950 está a rotina de grava- 
ção. 

— Na linha 9980 é dada a notícia da vi- 
tória. 

O programa roda em micros compa- 
tíveis com o TK82€ (como o TK85, 
CP-200, NE-Z8000, Sinclair ZX81 e ZX 
Spectrum) e deve ser rodado em FAST, 
já que em SLOW fica muito lento e, 
depois de algum tempo, tedioso. 





Kazimierz Josef Malachowski é Engenheiro 
Eletrônico, trabalhando como Gerente Co- 
mercial de Transmissão da Sul América Philips 
Telecomunicações, em São Paulo, e tem na 
programação de micros o seu hobby. 
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JORNADA NAS ESTRELAS 


—— ses Nossa 
































































640 LET SI=INT (RND*F)+A 
645 LET S2=INT (RND*F)+A 

650 LET Q$(S1,52)="E 

655 LET K2=INT (Q(Q1,02) /M) 

660 LET B2=INT ((Q(Q1,02)-K2*M) 
/H) 

665 LET G2=Q(01,02)-(INT (Q(Q1, 
02)/H))*H 

670 IF K2=N THEN GOTO VAL "700" 
675 FOR I=A TO k2 

680 GOSUB TT 

695 LET Q$(X,Y) ="K” 

699 NEXT 1 

700 IF B2=N THEN GOTO VAL "735" 
705 FOR I=A TO B2 

710 GOSUB TT 

725 LET Q$(x,Y)="B" 

730 NEXT I 

735 FOR I=A TO G2 

740 GOSUB TT 

745 LET Q$(X,y) =" 

750 NEXT 1 

805 GOSUB SS 

810 IF DI<=N THEN GOTO VAL "895 


” 
0815 PRINT "QUADRANTE “;Q1-A;"," 
:0Q2-A;" [ESB] SETOR ";S1l;".";S2 
816 LET V(Q1,02)=A 

817 PRINT ,, TAB E; 

820 IF K2=N THEN GOTO VAL "835" 

825 PRINT C$+E$ 

830 GOTO VAL "855" 

835 IF CE=A THEN GOTO VAL "850" 

840 PRINT C$+B$ 

845 GOTO VAL "855" 

850 PRINT C$+D$ 

855 PRINT AT HH,N; "SUAS ORDENS? 
” 


856 PAUSE CC 
857 PRINT AT HH,N;" 
" 


860 LET Z$=INKEY$ 

865 IF 2Z$="" THEN GOTO P 

999 REM 

1000 FOR I=A TO G 

1005 IF Z$=AS(I) THEN GOTO VAL " 

1015" 

1010 NEXT I 

1011 GOTO VAL "9500" 

1015 GOTO (2Z$="D") *6000+(2$="5") 

*9950+(Z$="N") *5000+(Z$="R”) *550 

0+(Z$="0") *6000+(2$="C") *6500+(Z 

$="A") *8000+(2$="B") *8500+(2$="x 

")*9000 

4999 REM [N] 

5000 IF B2<>N THEN GOTO VAL "507 

SE 

5010 GOSUB TR 

5012 PRINT AT T,N;"SR SPOCK PERG 

UNTA: COORDENADAS?" ;AT E, T;"Ql-> 
É 

5014 GOSUB 2 

5015 PRINT QO;TAB T;"Q2->"; 

5016 LET Q3-Q1 

5017 LET Q1=Q0+A 

5020 GOSUB Z 

5021 PRINT QO;TAB T; "WARP (1->8)? 
i 

5022 LET Q4=02 

5023 LET Q2=Q0+A 

5025 GOSUB Z 

5026 PRINT QO 

5030 PRINT ,,"SR SPOCK INFORMA: 

CHEGAREMOS AO QUADRANTE ";QI-A;" 

+"5O2-A;" EM "; 

5035 LET D9=SQR ((ABS (Q2-04)) ** 

B+(ABS (Q1-03)) **B) 

5036 LET D9=(T/H>=(D9-INT D9))*( 

INT D9)+(T/H<(D9-INT D9)) *(INT ( 

D9+T/H)) 

5037 LET D9=H*(R*D9+B-U(A)+A* (U( 


(D9/8) +M*(A-U(B 












5040 PRINT D9;" DIAS.",,, "VAMOS 
EMPREGAR ";Q0;" UNIDADES." 

5050 LET DI=D1-D9 

5051 LET El=E1-Q0 

5052 PAUSE M*C 

5060 IF Dl<=N OR El<=N THEN GOTO 
VAL "6562" 

5070 GOTO VAL "625" 

5075 GOSUB TR 

5076 PRINT AT T,N; "SR SPOCK PERG 
UNTA: VAMOS ENTRAR EM (ÓRBITA OU 

[MUDAR DE QUADRANTE?" 

5077 PAUSE CC 

5080 IF INKEY$="" THEN GOTO VAL 
"5076" 

5081 IF INKEY$="M" THEN GOTO VAL 
"5010" 

5082 IF INKEY$<>"O" THEN GOTO VA 
L "5077" 

5083 IF K2=N THEN GOTO VAL "5086 
" 


5084 PRINT ,,"NAO PODEMOS ENTRAR 
EM ORBITA COMKLINGONS NO QUADRA 
NTE, SENHOR. " 

5085 GOTO P 

5086 LET Al=N 

5090 FOR I=A TO G 

5091 LET Al=AL+U(I) 

5092 NEXT I 

5093 LET D9=(G-AL+R*B) *H 

5094 PRINT ,,'"FICAMOS EM ORBITA 

PARA REPAROS POR ";D9;" DIAS, C 
OMANDANTE. " 

5096 FOR I=A TO G 

5097 LET U(I)=A 

5098 NEXT I 

5099 LET CE=A 

5100 LET DI=D1-D9 

5101 LET T1=H 

5105 LET El=VAL "3000" 

5106 GOTO P 

5110 INPUT QO 

5111 IF QO<A OR QU>F THEN GOTO Z 
5112 LET QO=INT Q0 

5113 RETURN 

5499 REM R 

5500 LET DI=D1I-R 

5501 GOSUB TR 

5502 IF U(C)=N THEN GOTO VAL "55 
a 

5505 LET I=E 

5510 FOR X=Q1-A TO QI+A 

5515 LET J=H, 

5520 FOR Y=02-A TO Q2+A 

5525 IF Q(X,Y)=N THEN PRINT AT I 
E E lecdol 

5530 IF Q(X,Y)<M AND Q(X,Y)>=H T 
HEN PRINT AT 1,];"0";Q(X,Y) 

5535 IF Q(X,Y)<H AND Q(X,Y)>N TH 
EN PRINT AT 1,;"00";Q(X,Y) 

5540 IF Q(X,Y)>=M THEN PRINT AT 

1,3;0(X,Y) 

seas IF Q(X,Y)<>N THEN LET V(X,Y 
=A » 

5550 LET J=J+D 

5555 NEXT Y 

5560 LET I=1+B 

5565 NEXT X 

5566 IF U(C)<A THEN GOTO VAL "55 
so" 

5570 GOTO P 

5571 PRINT AT T,N;"SENSOR DE QUA 
DRANTES VIZINHOS DESTRUIDO, CA 
PITAO." 

5572 GOTO P 

5580 PRINT AT T,N; "SENSOR AVARIA 
DO.";AT E,H+B;" "," ";AT G,H+ 
pad 

5585 GOTO P 

5999 REM 

6000 LET DI=DI-R 

6001 GOSUB TR 

6002 IF U(D)=N AND Z$="Q"” THEN P 





RINT AT T,N; "SENSORES LOCAIS”,,” 
DESTRUIDOS, SR.",,"SO FUNCIONAM 
OS", , "RELATORIOS" 

6003 IF U(D)=N OR Z$="D" THEN GO 
TO VAL "6030" 

6005 FOR I=A TO F 

6007 FOR J=A TO F 

6008 IF K2<>N THEN GOTO VAL "601 
o" 

6009 IF Q$(I,3)="R" THEN LET QS( 
LJ)="." 

6010 PRINT AT I*B+C,N+J*B-B;Q$(I 
19) 

6015 NEXT J 

6020 NEXT I 

6030 PRINT AT T,K; "FALTAM ";INT 
Dl;" DIAS";AT E,K; "TORPEDOS: ";T1 
;AT G,K; "ENERGIA: ";EL;AT H+A,K;" 
ESCUDO:";C1;AT H+C,K;"KLINGONS"; 
AT H+D,H+F; "DESTRUIDOS: ";KO-K1;A 
T K-A,H+F; "FALTAM: ";KL;AT K+A,K; 
“BASES: ";BI;AT K+D,K; "PONTOS: ";P 
* ONA 

6035 GoTo P 

6499 REM 

6500 GOSUB TR 

6501 IF Q(Q1,02)<M THEN PRINT AT 
T,N;"SR SPOCK CANCELOU O ALARME 
.", "O QUADRANTE ESTA LIMPO DE"," 
KLINGONS. " 

6502 IF Q(Q1,02)<M THEN GOTO P 
6503 PRINT AT HH-B,N; "ENTERPRISE 
", "KLINGONS", "DEFESA: ";CE, "DEFE 
SA: ";CK 

6505 LET I=RND 

6506 LET AD=A*(I>=R*B) 

6509 LET DI=D1-R 

6510 IF AD=A THEN GOTO VAL "6580 
” 











6515 PRINT AT T+A,N; "KLINGONS AT 

ACANDO COM FORCA: ";CK 

6520 PRINT ,, "ENTERPRISE EM ";C$ 
7 (D$ AND CE=A); (B$ AND CE<A AND 

CE>=R*C) ; (E$ AND CE<R*C) 

6525 PRINT ,,"SR SPOCK PERGUNTA: 
*  MEUGA OU DEFESA" 

6528 PAUSE CC 

6531 IF INKEY$="F" THEN GOTO VAL 
"5000" 

6532 IF INKEY$<>"D" THEN GOTO VA 
L "6528" 

6534 IF Cl>=C/D*E1 THEN GOTO VAL 
"6543" 

6539 PRINT AT H,N;C1l;" UNIDADES 
NO ESCUDO.", "FORCA PARA ESCUDO? 
(0->"; INT (C/D*E1-C1);")" 

6540 INPUT CO 

6541 IF C0>C/D*El THEN GOTO VAL 
"6540" 

6542 LET CI=INT (C1+C0) 

6543 LET El=E1-CO 

6545 LET AK=(EIL*RND*CK+M*H*RND) * 
k2 

6546 LET DE=CI*CE*U(T) +B2*M*H+M* 
G2 

6547 LET RC=AK-DE 

6548 LET CI=A*(RC<=M) +R*D*(RC>M 
AND RC<=M*G) +R*B* (RC>M*G) 

6550 IF CI=A THEN GOTO VAL "6500 
" 


6551 IF CI=R*D THEN LET CE=CE-R 
6552 IF CI=R*B THEN LET CE=CE-R* 
B 

6554 FOR J=A TO € 

6555 LET I=INT (RND*G)+A 

6556 LET U(I)=U(I)-(N AND CE=A)- 
(R AND CE<A AND CE>=R*C)-(R*R AN 
D CE<R*C) 

6557 NEXT J 

6558 LET Cl=(C1-M) *(CE>=R*D)+(C1 
-M*B) *(CE<R*D) 

6559 IF CI<N THEN LET Cl=N 

6560 IF CE>N'THEN GOTO VAL "6500 











6562 CLS 
6563 PRINT "RRARARERA Ti 


6566 PRINT ,," NO ";DO-INT DI; 
“EJDIA DA SUA VIAGEM, A","USS EN 
TERPRISE, SOB O COMANDO DOSR ";X 


$ 

6567 PRINT ,,"E DO PRIMEIRO OFIC 
IAL, SR SPOCK, DESAPARECEU NO QUA 
DRANTE ";Q1-A;",";Q2-A 

6568 PRINT "DA NOSSA GALAXIA, CO 
M ";INT (RND*E*M)+M 

6569 PRINT "TRIPULANTES A BORDO. 
",,, "A CONFEDERAÇÃO TERRESTRE ES 
TA DE LUTO.",,.» 

6570 FOR I=A TO E+G 

6571 PRINT "EEEM", 

6572 NEXT 1 

6573 PAUSE ME 

6575 CLS 

6576 GOTO VAL "9000" 

6580 PRINT AT T+A,N; "PODEMOS ATA 
CAR COM FORCA ";CE 

6581 PRINT ,, "ENTERPRISE EM ";C$ 
; (D$ AND CE=A); (B$ AND CE<A AND 
CE>=R*C) ; (E$ AND CE<R*C) 

6582 PRINT ,, "SR SPOCK PERGUNTA: 
", "RETIRADA, MORPEDOS OU [BASERS" 
6584 PAUSE CC 


6586 IF INKEY$="R" THEN GOTO VAL” 


"5000" 

6587 IF INKEY$="F" THEN GOTO VAL 
"6610" 

6588 IF INKEY$<>"T" THEN GOTO VA 
L "6584" 

6589 IF Tl=N THEN GOTO VAL "6700 
" 


6590 GOSUB TR 

6591 PRINT AT T,N;"SR SPOCK INFO 
RMA: TEMOS: ";T1, "TORPEDOS. HA N 
ESTE QUADRANTE ";G2, "ESTRELAS. O 
LANCADOR DE TORPEDOSESTA COM "; 
U(E) *M; "[4/5DE EFICIENCIA." 

6592 PRINT "NOSSA CHANCE DE EXIT 
O E: ";U(E) *(A-G2/(B*H)) 

6593 LET J=RND 

6595 PRINT ,, +, ("LANCADO O TORPE 
DO" AND K2=A) ; ("LANCADOS DOIS TO 
RPEDOS" AND K2=B) 

6596 LET T1l=T1l-K2 

6597 PAUSE M*D 

6599 PRINT ,,("KLINGONS DESTRUID 
OS" AND U(E) *(A-G2/(B*H)) >=) ;(" 
RR AND U(E) *(A-G2/(B*H)) <J 
6600 PAUSE M*A 

6601 IF U(E)*(A-G2/(B*H))<J THEN 
GOTO VAL "6500" 

6602 LET Kl=K1-K2 

6603 IF Kl=N THEN GOTO VAL "9980 
" 


6604 LET Q(Q1,02)=0(Q1,02)-M*K2 
6605 LET Pl=P1+K2+K0-K1 
6606 PRINT AT C,E;C$;D$;" 
6607 LET K2=N 

6608 LET CK=A 

6609 GOTO VAL "6500" 

6610 GOSUB TR 

6611 PRINT AT T,N; "SR SPOCK INFO 
RMA: OS FASERS TEM ";U(T) *M;" [M/ 
ADE EFICIENCIA. TEMOS" 

6612 PRINT El;" UNID. DE FORCA D 
ISPONIVEIS", "QUAL A FORCA PARA O 
S FASERS?" 

6615 INPUT FI 

6616 LET FI=(El*(F1>E1)+F1*(Fl<= 
EI) ) *U(T) 

6620 LET AE=FI*CE*M*R+B24M*C 
6621 LET DK=(F1*RND+MtCK+M*G2) *K 
2 

6623 LET El=El-F1 

6624 IF El<=N THEN GOTO VAL "656 


1 
6625 LET RC=AE-DK 


MICRO SISTEMAS, outubro/83 





6630 LET CI=A*(RC<=M) +R*D* (RC>M 
AND RC<=M*G) +R*B*(RC>M*G) 

6631 IF CI=A THEN GOTO VAL "6500 
” 


6632 IF CI=R*B THEN LET CK=CK-R* 

B 

6633 IF CI=R*D THEN LET CK=CK-R 

6635 IF INT CK>N THEN GOTO VAL 

6500" 

6640 GOTO VAL "6602" 

6700 PRINT "SR. SPOCK INFORMA: N 

AO HA MAIS TORPEDOS, TEMOS QUE 

USAR FASERS." 

6701 PAUSE M*C 

6705 GOTO VAL "6610" e! 

7999 REM [RELATORIO DE AVARIAS) 

8000 GOSUB TR 

8001 LET DI=DI-R 

8002 PRINT AT T,D+B; "RELATORIO D 

E AVARIAS” 

8003 IF U(F)=N THEN GOTO VAL "80 
po 


30 

8006 PRINT AT F,N; “(LPROPULSAO :NU 
LTRALUZ:";TAB H+A; "NSUBLUZ:" 
8007 PRINT "2SENSORES: IRGALATICO 
S:";TAB H+A; "MQUADRANTE: " 

8008 PRINT ATE: [BESCUDO:" 
;TAB H+A; "RPASERS:";TAB H+A; DTO 
RPEDOS:" 

8009 PRINT "(ICOMPUTADORBBIBLIOTE 
CA:";TAB H+A; NNAVEGACAO: " 

8020 FOR I=A TO G 


8025 IF U(I)=N THEN PRINT AT I+E 
, HH+B; "DES'TRUIDO 


8026 IF U(I)<A AND U(I)>N THEN P 
RINT AT I+E,HH+B;U(I) *100;” (8/0" 
8027 IF U(I)=A THEN PRINT AT I+E 
+HH+B; "NORMAL" 

8030 NEXT I 

8031 GOTO P 

8033 PRINT "SISTEMA DE CONTROLE 
DE AVARIAS FORA DE ACAO, SENHOR 


8035 GOTO P 

8499 REM BIBLIOTECA 

6500 GOSUB TR 

8501 IF U(F)<>N THEN GOTO VAL "8 
504" 

8502 PRINT AT T,N; "RATENCÃO?) BIB 
LIOTECA DESTRUIDA” 

8503 GoTO P 

8504 IF U(F)<>A THEN PRINT AT T, 
N; "RATENCAO*) BIBLIOTECA AVARIAD 
A. DADOS: NAO CONFIAVE 


NÉ gio 

8508 PRINT AT F,E;"MAPA DA GALAX 
IA";AT H,N; 

8509 FOR I=B TO INT (G*U(F)) 
8510 FOR J=B TO INT (G*U(F)) 
8515 IF V(1,0)=N THEN PRINT "*** 
8520 IF V(I,J)=A THEN GOSUB VAL 
"8540" 

8525 NEXT J 

8530 NEXT 1 

8531 LET DI=DI-R 

8535 GOTO P 

8540 IF Q(I,9)>=M THEN PRINT Q(I 
0)"; 

8545 IF Q(I,9)<M AND Q(I,9)>=H T 
HEN PRINT "0";Q(1,9);" *; 

8550 IF Q(I,9)<H THEN PRINT "00" 
30(1,9)7" *; 

8555 RETURN 

8984 REM TERMINO POR FALTA DE TE) 


(mpO) é 
8985 GOSUB TR 


8990 PRINT AT E,N;"O TEMPO ACABO 
U, ";X$ 

8995 GOTO VAL "9005" 

8999 REM [DESISTENCIA 

9000 GOSUB TR 

9005 PRINT AT G,N; "QUE PENA CAPI 
TAO,",,,"O SR TINHA ";Pl;" PONTO 





S.";AT HH,N; “ALGUEM SE HABILITA? 
(S/N) " 

9006 PAUSE CC 

9015 IF INKEY$="S" THEN RUN 
9020 CLS 

9030 STOP 

9499 REM (LISTA DE COMANDOS) 

9500 GOSUB TR 

9501 LET DI=D1-R 

9505 PRINT AT E,N; "B-GRAVAR";TAB 
N;"D-DIARIO DE BORDO";TAB N; "N- 
NAVEGACAO-ESCOLHA DA ROTA";TAB N 
; "R-SENSOR P/ QUADRANTES VIZINHO 
S";TAB N;“Q-MAPA DO QUADRANTE";T 
AB N; “G-COMBATE";TAB N; "A-RELATO 
RIO DE AVARIAS";TAB N; “B-BIBLIOT 
ECA";TAB N; "M-DESEJA DESISTIR" 
9510 GOTO P 








9600 CLS - 24 
9601 PRINT "RátRkaas gi 

ERR RAR = UPER START) 
9602 RETURN 


9699 REM [DESENHO DA ENTERPRISE 
9700 PRINT AT B,K;",- 





9701 PRINT 


/qre 
9703 PRINT TAB G;", ,";TAB H+G;" 


PAR: 
9704 PRINT TAB T;",--- 


DIOR TERENE TAB B=A;"""======—==— 





9709 RETURN 

9750 LET X=INT (RND*F)+A 

9751 LET Y=INT (RND*F)+A 

9752 IF Q$(X,Y)<>"." THEN GOTO T 


T 

9753 RETURN 

9800 FOR J=T TO H+H 
9801 PRINT AT J,N;" 


9802 NEXT J 

9803 RETURN 

9949 REM 8) 

9950 GOSUB TR 

9951 PRINT AT G,N;"S GRAVA NA FI 

TA", + "Ri RETORNA AO JOGO" 

9952 PAUSE CC 

9954 IF INKEY$="R" THEN GOTO P 

9958 IF INKEY$<>"S" THEN GOTO VA 

L "9952" 

9959 SAVE "TREK" 

9960 GOTO P 

9980 CLS 

9981 PRINT "WEWEKERAXANOTICIA EX. 
pAtRe aa 

9982 PRINT ,+" NO ";DO-INT DI; 

“M) DIA DA SUA VIAGEM, A”,"USS EN 

TERPRISE, SOB O COMANDO DOSR ";X 


5 

9984 PRINT "E DO PRIMEIRO OFICIA 
L, SR SPOCK, INFORMOU TER LIVRADO 
A NOSSA GA-LAXIA DA ULTIMA ESPA 
CONAVE KLIN-GON. A CONFEDERACAO 
TERRENA, EM SINAL DE REGOZIJO, D 
ECRETOU UMA SEMANA DE FESTIVIDAD 
ES E CONDE- COROU O CAPITÃO ”,X$ 
9985 PRINT "COM O TOTAL DE ";Pl; 
” MEDALHAS", "PELO SEU FEITO HERO 
TOO cita 

9986 FOR I=A TO F*D 

9987 PRINT "RREEM, 

9988 NEXT I g 

9989 PRINT AT HH,N;"OUTRO HEROI? 
(S/N) * 

9990 PAUSE CC 

9992 IF INKEY$="S" THEN RUN 

9998 SAVE "TREK" 

9999 RUN 












O autor de Incrementando um TK (veja MS nº 9) apresenta os esquemas de duas criações 
suas: a inversão do vídeo e a automatização do cassete no TK82-C 





Inversão de vídeo 
e cassete automático 


Sérgio Cwikla 


provocou grande receptividade dos usuários e proprie- 

tários de micros desta categoria. Recebi centenas de 
cartas de vários lugares do Brasil e do exterior (Miami, Santia- 
go, Buenos Aires) pedindo melhores esclarecimentos sobre o 
assunto, o esquema elétrico, sugestões, informações etc, o que 
veio ainda comprovar o alto grau de penetração da revista. 

Diante da dificuldade de responder a todas as correspondên- 
cias individualmente, elaborei este artigo que, de forma gené- 
rica, fornece algumas considerações particulares do micro e 
descreve ainda alguns incrementos. 

Importante notar que os esquemas que apresentaremos nes- 
te artigo foram desenvolvidos para a primeira versão do TK82- 
C, que continha mais circuitos que a versão atualmente comer- 
cializada. 


O artigo Incrementando um TK (MS nº 9, junho/82) 


VENCENDO AS LIMITAÇÕES 


Quando se resolve investir na compra de um microcompu- 
tador pessoal não se deve adquirir o primeiro modelo que nos 
é oferecido. É necessário que se faça uma escolha criteriosa de 
acordo com as necessidades e, logicamente, com as nossas pos- 
sibilidades. Assim, antes de uma tomada de decisão, devemos 
reunir o máximo de informações através de catálogos técnicos, 
demonstrações em lojas do ramo, artigos publicados em revis- 
tas especializadas, contatos com pessoas possuidoras de micros 
etc, estabelecendo com isso uma relação entre o preço e a per- 
formance de cada equipamento, de modo que possamos anali- 
sar qual deles se adapta a nosso caso. 

Para aplicações domésticas, didáticas, pequenas tarefas co- 
merciais, cálculos científicos e até mesmo para alguns jogos re- 
creativos, o TK82-C ou seu similar NE-Z8000 atendem relati- 
vamente bem, além de possuírem os preços mais acessíveis do 
mercado nacional. 
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O desempenho para esta categoria de equipamento pode ser 
consideravelmente melhorado se fizermos uso de recursos de 
programação ou sub-rotinas em linguagem de máquina, dando 
assim uma maior velocidade e flexibilidade de processamento, 
embora para isso tone-se necessário que se faça um curso de 
programação do microprocessador Z80. 


Por outro lado, podemos aumentar a capacidade desses mi- 
cros através da adição de periféricos como cassete, disquetes, 
impressora etc. No TK82-C a interface de cassete permite ape- 
nas a leitura e gravação de programas, sem controlar remota- 
mente o acionamento e desligamento do motor do gravador, o 
pm de certa forma torna-se um incômodo, pois nos obriga a 

car aguardando o micro finalizar a leitura ou gravação para 
então desligarmos manualmente o gravador. 

Este problema torna-se mais grave em programas extensos, 
já que teremos que ficar prestando atenção no gravador até 
que o programa seja passado, pois se o mesmo continuasse a 
rodar após o término da leitura ou gravação do programa, per- 
deríamos a posição exata da fita em relação à leitura ou grava- 
ção de um próximo programa, principalmente quando este é 
parte integrante do anterior (encadeamento de programas). 


Encontramos estas situações quando, por exemplo, vamos 
manipular programas e dados que ultrapassem a memória RAM 
do micro, sofrendo, desta maneira, limitações no armazena- 
mento. Uma das opções é desmembrar o programa em duas ou 
mais partes distintas e gravá-las sequencialmente na fita. Neste 
caso, os dados poderiam ser introduzidos na primeira parte, e 
endereçados diretamente na memória através da instrução 
POKE, de forma que não se percam com o comando LOAD. 
Finalizada a entrada dos dados, podemos fazer com que o pró- 
prio programa chame da fita a outra parte integrante, que po- 
derá ler os dados com a instrução PEEK, fazendo o seu devido 
processamento. 
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É evidente que o encadeamento de programas de forma au- 
tomática depende muito do software, mas necessariamente, 
precisaremos de um circuito auxiliar que ligue e desligue o mo- 
tor do gravador, trabalhando em sincronismo com a fita. 

A automatização do gravador traz ainda a vantagem de au- 
mento da autonomia da fita, já que os espaços na gravação en- 
tre um programa e outro são reduzidos ao mínimo. Isto acon- 
tece porque quando gravamos com o sistema automatizado, ao 
colocarmos o gravador na função REC-PLAY e digitarmos 
SAVE nome do p e NEW LINE, somente com a digita- 
ção desta última tecla é que o gravador começará a rodar, evi- 
tando inclusive que seja gravado E ruído que aparece na 
gravação, antes de se apertar NEW LINE pelo sistema conven- 
cional, muitas vezes prejudicando a leitura do programa, fa- 
zendo com que o micro fique inoperante. Quando isto ocorre, 
temos que desligar o micro e, após alguns segundos, ligá-lo no- 
vamente até surgir o cursor K no canto inferior esquerdo do 
vídeo, 

Este problema pode ser sanado com a adaptação de um cir- 
cuito que controle remotamente o motor do gravador através 
de software, que passamos a descrever a seguir. 


O AUTOMATIZADOR DO CASSETE 


A intenção seria projetar um circuito de custo reduzido, 
utilizando o mínimo de componentes e de fácil aquisição, de 
modo a facilitar sua instalação dentro do micro. 

Com o auxílio de um multímetro digital de boa precisão, 
comecei a pesquisar os níveis lógicos de todos os integrados 
que complementam o processador Z80. Era preciso adotar um 
ponto de referência que, nos comandos SAVE e LOAD, tives- 
sem um nível contrário dos estados RUN, programação e escri- 
ta. Por estado RUN entende-se quando o micro está executan- 
do instruções do programa. Para experiências, podemos simu- 
lar o seguinte loop: 

10 FOR 1=1 TO 10000 
20 NEXT I 

RUN 

NEW LINE 


OM, OTA T0 0 001000 0000 
DO 
MMOOIIIGANIAIA ONA 


& 
MA, 


Figura 3 — Modo SAVE: 0,1 volts, nível lógico 0. 
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Na prática, eu não consegui os níveis exatamente nas for- 
mas esperadas. Porém, obtive níveis próximos do esperado no 
pino 10 IC 6 do micro, conforme mostra a figura 1. 














Figura 1 — Tensões do pino 10 do IC 6 do TK82-C 


O passo seguinte foi a elaboração do circuito que interpre- 
tasse as tensões do IC 6 da seguinte maneira: nível O para os 
comandos SAVE e LOAD e nível 1 para os demais estados. 

Observando as representações gráficas das funções do circui- 
to na figura 2, notamos que abaixo de 0,8 V obtemos o nível 
lógico O e para as tensões superiores um nível lógico 1 (*). Na 
ocasião da passagem de um programa para o cassete, o compor- 
tamento será como o mostrado no gráfico da figura 3, que as- 
sume um nível O e, após a gravação, retorna a seu estado ori- 
ginal. Caso semelhante ocorre na leitura de um programa, co- 
mo mostrado na figura 4. 

A figura 5 apresenta o gráfico do micro quando em seu es- 
tado RUN (loop). Neste processo, a tensão cai de 1,6 V para 
1 V, mantendo-se porém no nível 1. O nível O só será interpre- 
tado pelo circuito com as tensões abaixo de 0,8 V. O resultado 
destes níveis é obtido no pino 11 do integrado 7400 (veja es- 
quema da figura 6) e as tensões são obtidas no pino 10 do IC 6 
do micro. A montagem poderá ser feita na chapa de circuito 
impresso tipo padrão ou mesmo numa confeccionada nas di- 
mensões adequadas. 





* N. R.: Formalmente, o nível lógico 1 é obtido com tensões acima de 
2 V. Empiricamente, entretanto, o autor conseguiu este nível com ten- 
sões entre 0,8 e 2V. 


o) 
po) DD) 
RNA 0000 0000000! 


Figura 4 — Modo LOAD: 0,3 volts, nível lógico 0. 


Figura 5 — Modo RUN: 1 volt, nível lógico 1. 
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INVERSÃO DE VÍDEO E CASSETE AUTOMÁTICO 


(tr805) 
PINO3 
Icz2 








PINO 10 DO IC6 
(SNT4LSIST) 





TEMAS E COMPUTADORES tro 
ss! 


MICROS, 
VÍDEOS, GAMES & CIA. 
Computadores: 
Polymax, Unitron, Prológica, 
Micro Digital, Sysdata. 
x OFERTA ESPECIAL 
“MAXXI” 
Vídeos: Philco e Sharp 


Televisores Sanyo 


Rua Estados Unidos, 2141 
Tel. 8528290 / 257-3852 /231-1173 











REMOTO DO GRAVADOR 


Figura 6 — Lista de materiais: 


e R34K3x 1/4w 
e CII 7400 e DleD21IN9I14 e Cl47mEx12V 
e TI BC558 ou similar e R14K7x1/4w e C22,2mFx12V 
e T2BC 549 ou similar e R21K5x 1/4w e RLI relé ZK020006 


2114 € 


ICIO 


ICIS  1c16 


ANE; 


a 





Figura 7 — Layout dos componentes do TK82-C, versão antiga. 
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De 17a23 
e outubro 
a CompuShop 
tem mais 
um endereço. 


III Feira Internacional de Informática. 
RUA M DE MICRO, Nº 16- PARQUE ANHEMBI 


A III Feira Internacional de Informática está aí, e a CompuShop vai estar presente, com uma 
grande variedade de novidades em hardware e software. Isso é muito importante, mas não é o principal. 
Para a CompuShop , o mais importante é a sua filosofia de trabalho e de apoio ao 
cliente usuário de microcomputadores. 

Foi por isso que a CompuShop criou TotalWare - uma infra-estrutura que é ao mesmo tempo 
hardware e software, equipamento e oportunidade, serviço e confiabilidade, programa e consulta, 
atendimento, treinamento e assistência técnica É por isso que a CompuShop não quer apenas vender 

microcomputadores e abandonar você em seguida. Antes de mais nada, a CompuShop quer saber o 
porquê da sua compra e se ela é realmente necessária para as suas atividades ou para a sua empresa. 
Todos esses cuidados são tomados porque só assim a CompuShop pode orientar, esclarecer, 
fazer uma indicação correta e continuar dando assistência 1. 
a você, a sua empresa e ao seu equipamento. 
E essa é a única maneira correta de você comprar. 














CompuShop 


Loja 1 - Rua Dr.Mário Ferraz, 37 - CEP 01453 - São Paulo - SP - Tels.: (011) 210-0187/212-9004/815-0099 - Telex (011) 36611 BYTE BR 
Loja 2 - Av. Pres. Juscelino Kubitschek, - CEP 04543 - São Paulo - SP - Tels.: (011) 64-2806/852-7149 
Estacionamento próprio. Abertas de segunda a sexta das 9 às 19 horas,e aos sábados das 9às 14 horas. 
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De acordo com o esquema da figura 6, observamos que o 
circuito possui três pontos de ligações com o micro. Para maior 
facilidade de identificação destes pontos, a figura 7 apresenta 
um lay-out dos integrados no TK82-C. Para adaptações no NE- 

, não encontramos a numeração dos componentes no 
impresso. Entretanto, os integrados utilizados para as ligações 
estão na mesma disposição no TK e desta forma o lay-out serve 
como orientação para o incremento no NE-Z8000. 

Em alguns casos, principalmente quando operamos em 
FAST, o RL1 poderá pulsar a cada toque no teclado. Se isto 
ocorrer, coloque um capacitor eletrolítico em paralelo com D2 
para provocar um pequeno retardo. Seu valor poderá ser expe- 
rimentado a partir de 100mF, observando-se sua polaridade. O 
relé experimentado foi o ZK02006, com dois contatos reversí- 
veis: um utilizado para fechar o contato do motor do gravador 
através do plug REM e o outro ficando a cargo da criatividade 
de cada usuário. No meu caso, utilizei-o para ligações de LEDs 
que monitoram a interface do cassete, embora eles possam ain- 
da ser aproveitados para conectar aparelhos elétricos simulta- 
neamente. 

Uma vez concluída a montagem da figura 6, podemos fazer 
um pré-teste antes de ligá-lo ao micro, bastando ligar +5 V no 
pino 14 do CI 7400, +9 V no coletor do T2 e O V à massa. Ca- 
so o leitor não consiga uma fonte com estas tensões, poderá 
utilizá-las do próprio micro. 

Após o circuito estar alimentado, podemos comprovar o seu 
funcionamento ligando o anodo do Di ao terra. Neste mo- 
mento o RL1 deverá se energizar, retornando ao normal quan- 
do desligado. Agora só restaria fazer as interligações definitivas 
no computador. Se porventura não funcionar, confira todas as 
o ce de acordo com o esquema, consultando ainda a tabela 
da figura 8, onde constam todas as tensões do CI 7400 nos 
seus diversos estados de operação. 


A INVERSÃO DE VIDEO 


Talvez muitos usuários tenham sentido, como eu, a necessi- 
dade de se obter uma imagem do TK com fundo escuro e ca- 
racteres em branco. Após um trabalho alongado na digitação 
de programas ou mesmo nas suas execuções, sentimos um can- 
saço visual decorrente da predominância branca no vídeo, agra- 
vada pelas oscilações provenientes do próprio sincronismo da 
TV ou dos 60 Hz da rede elétrica. 


ORIGINAL 


Figura 9 — Modificação no impresso para a inversão de vídeo. 
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MODALIDADES 
PROGRAMA SAVE LOAD | RUN 
2v 0,7V 0,9V w | 
3,7V 3,4V 2,7V 
ov 0,2V 0,9V 
ov ov | ov 
7,4V 7 0,5V 
5V = 1v 1,1V 1,4V 
BKE 1,5V 1 1, 1V 1,4V 
[us 5v 5v sv 5v 




















Figura 8 — Tabela de tensões do CI 7400. 


A reversão do vídeo do TK82€ é facilmente conseguida 
com uma pequena modificação no seu hardware, que permitirá 
obter imagens em fundo preto ou branco, conforme desejar o 
usuário. O único gg reçõ utilizado é uma chave de três pó- 
los e duas posições. Para esta modificação, basta identificar o 
IC 9 do micro, com auxílio da figura 9 e, no lado inferior do 
circuito impresso, com um estilete, fazer um pequeno corte de 
acordo com o desenho. Em seguida, soldar três fios nos pontos 
indicados, interligando-os com a chave. 

É recomendável que as modificações sejam feitas com o mi- 
cro desligado e pelas diferenças do circuito impresso, elas não. 
poderão ser utilizadas no NE-Z8000. 

Os dois incrementos que aqui descrevemos talvez tragam 
um novo horizonte de aplicativos para os usuários, dependen- 
do da pretensão de cada um. A combinação do circuito auto- 
matizador do cassete com o software poderá trazer excelentes 
recursos, principalmente em aplicações comerciais. 

A inversão do vídeo favorece o conforto do operador/pro- 
gramador, podendo-se ainda imitar o vídeo de fósforo verde 
utilizando-se um acrílico verde na frente da tela, proporcio- 
nando um visual mais agradável e facilitando os reflexos de luz 
incidente no vídeo. 


J 





Sérgio Cwikla fez Administração de Empresas na Faculdade de Ciências 
Sociais e Aplicadas de Foz do Iguaçu, Paraná, e trabalha na Itaipu-Bina- 
cional, onde é responsável pela manutenção de equipamentos de co- 
municações do Setor de Segurança. 


MODIFICADO 
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primentos Prodata: 
uma boa impressão do 
que foi gravado 






OFERTAS PARA 


OUTUBRO/NOV EMBRO 


eFitas para impressoras 
ELEBRA e P 720 PROLÓGICA 
CrS 2.000,00 + 18% IPI 





eFitas para impressoras 
DIGILAB 
CrS 3.969,00 — 18% IPI 


eFitas para cartuchos 
CENTRONIOS 52 da Dismac 


é PIODATA CES TODO ii 


eFitas para impressoras 
Matricial SYCOR/EDISA 
Centronies 700 e IBM 
Silver Dolar: 
CrS 1.195.00 + 18% IPI 


“Fitas para impressoras 
de texto COBRA D 50 
(Mylar ou Nylon): 

Cr$ 2.420.00 + 18% IPI 


eFitas para impressoras 
de texto POLIMAX modelo 
Diablo Hytype IH - (Mylar ou 
Nylon): 
CrS 5.349,00 + 18% IPI 





eFitas impressoras em cartucho 
para todos os Micros. Minis e 
Processadores de Palavra. 
eFitas largas para impressoras 
grandes (IBM. Burroughs, 
Cobra. Facom, Univac, etc.). 
em nylon e mylar. 

eFitas para impressão de 
caracteres magnéticos CMC-7 
(Tandem-Cobra, H.Bull, 
Olivetti, Burroughs, MDS, etc.). 
eDiskettes de 8” e 5 1/47 
(densidade:simples e dupla). 
Confie na experiência de 
8 anos de quem fabrica 
suprimentos da mais alta 
qualidade. Exija Prodata. 


O PIODATA 


PRODUTOS PARA PROCESSAMENTO DE DADOS LTDA 
Rua Henrique Ongari. 103 CEP 05038 São Paulo SP Tels. 262-0896/864-3410 


representantes: 

Rio de janeiro: fones 253-348: 4188 / Belo Horizonte: fone 225-9871 

e 225-4235 / Curitiba: fones 263-3224, 262-8632 e 263-3256 / Porto Alegre: fones 
26-6063 e 26-1319 / Belém: fone 223-6319 / Recife: fone 227-2969 





ESPEP PES PD RS RS E O ee 





Registre os lançamentos, atualize o saldo e, de quebra, 
administre melhor sua vida financeira em seu micro da linha TRS-80 





Controle suas 


operações bancárias 


exaustivo trabalho de consoli- 
dação de saldos bancários atra- 
vés de canhotos de talões de 


cheques e extratos periódicos emitidos 
pelo banco leva os usuários de micro- 
computadores a desenvolver programas 
que auxiliem na execução desse serviço. 

Encontram-se disponíveis no merca- 
do vários programas com esta finalidade 
mas, via de regra, Os programas mais uti- 
lizados são simples e desenvolvidos pe- 
los próprios usuários. Por este motivo, 


eles estão frequentemente aquém das 
abalo oferecidas pelos micro- 


computadores. Podemos acrescentar 
anda o fato de que grande parte dos 
usuários não dispõe de unidades de dis- 
co e impressora. 
Pensando nisso, foi desenvolvido um 
programa com alguma complexidade, o 
— Registro Pessoal de Cheques, 
que, apesar de limitado por trabalhar 
com fita magnética (cassete), fornece 
produtos bastante úteis. Além de regis- 
trar as operações e executar o acompa- 
nhamento do saldo, ele auxilia na ad- 
ministração da vida financeira do usuá- 
rio, pois fomece os totais retirados e de- 
positados por categoria ou finalidade, 
como educação, saúde, alimentação etc. 
Deste modo, uma consolidação anual 
pode até apoiar a elaboração da decla- 
ração do Imposto de Renda. 
O RPC foi desenvolvido no CP-500, 
com opção de uso de impressora Star/ 


Marcelo Renato Rodrigues 


Dismac ou equivalente, de 80 colunas, 
com utilização de caracteres compri- 
midos. Consequentemente, este progra- 
ma roda também em micros derivados 
da família TRS-80 Modelos I e III, a 
saber: DGT-100, D-8000/1/2, CP-300, 
Naja, JR Sysdata e JP-01. Para adaptálo 
a outros equipamentos, sugerimos a lei- 
tura do artigo “Três faces da mesma 
linguagem”, de Orson V. Galvão, publi- 
cado nos números 19 e 20 de MICRO 
SISTEMAS. 


FUNCIONAMENTO E OPÇÕES 


O programa apresenta inicialmente o 
menu das rotinas possíveis: 
(1) ADICIONAR LANCAMENTOS 
(2) CARREGAR LANCAMENTOS DA FITA 
(3) APRESENTAR LANCAMENTOS NA TELA 
(4) ALTERAR LANCAMENTO 
(5) IMPRIMIR PLANILHA 
(6) GRAVAR LANCAMENTOS 
(7) FIM DO PROCESSAMENTO 


QUAL A ROTINA DESEJADA? 


A rotina (1), de introdução de lan- 
çamentos, tanto inicia quanto acrescen- 
ta novos lançamentos âqueles já existen- 
tes, através do carregamento dos dados 
contidos na fita magnética ou introdu- 
zidos pelo teclado. O programa prevê 
600 lançamentos, sendo que tal quanti- 
dade pode ser alterada em função da ca- 
pacidade do micro. Os valores em cru- 
zeiros são tratados com dupla precisão, 


embora nem sempre sejam editados com 

todos os seus algarismos significativos. 
O lançamento é composto dos se- 

guintes dados: 

e número do cheque — variável alfanu- 

mérica de 6 dígitos; 

e mês-delal2; 

e dia-dela3l; 

e descrição da transação — variável al- 

fanumérica de 11 dígitos; 

e código da transação — dígito numé- 

rico de 1 a 9, que codifica a categoria ou 

finalidade da transação, a saber: 


1 — alimentação; 

2 — moradia; 

3 -— lazer; 

4 — educação; 

5 — saúde; 

6 — transportes; 

7 — serviços públicos; 
8 — outros; 

9 — depósitos. 


e valor da transação. 

Após a introdução do valor, o pro- 
grama possibilita a correção de qualquer 
dado do lançamento (veja a figura 1). 
Note que o saldo anterior é solicitado 
apenas para a primeira utilização ; nas uti- 
lizações posteriores este valor é obtido 
da fita magnética. 

A rotina (2) carrega os lançamentos 
da fita cassete. O conjunto desses lança- 
mentos fica protegido por um rótulo 
que é o nome do arquivo solicitado pelo 
programa. 
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A rotina (3) apresenta os lançamen- 
tos na tela. O usuário pode limitar esta 
apresentação através de datas de início 
e fim (veja a figura 2). Observe também 
a apresentação pelo programa dos va- 
lores das transações totalizados por ca- 
tegoria na fi Er 

A rotina (O paid alterar qualquer 
lançamento através de uma série de co- 
mandos que possibilitam avançar ou re- 
troceder (teclas + e 4 ), inserir, subs- 
tituir e eliminar qualquer lançamento 
desejado. 

A opção para impressão é a rotina 
(5), que apresenta a planilha mostrada 
na figura 4. Nesta planilha, o valor de 
cada lançamento é impresso na coluna 
apropriada, sendo que na mesma linha, 
a última coluna mostra o saldo logo 
após essa transação. Nas duas últimas li- 
nhas têm-se os totais por categoria e o 
percentual relativo ao total gasto, ou 
seja, a contribuição percentual da cate- 
goria para o gasto total. 

A rotina (6) possibilita a gravação em 
fita magnética a partir do lançamento 
mg e estabelecido pela sua data. 
Se for dada entrada, diretamente, com 
tecla ENTER ou equivalente em padrão 
ASCII, o programa assume o primeiro 
lançamento existente no arquivo ante- 
rior como primeiro lançamento do novo 
arquivo. Este arquivo terá seu próprio 
nome, fornecido pelo usuário. 

A rotina (7) encerra o processamento. 

Por fim, recomendamos àqueles que 
são iniciantes em programação, desen- 
volver o fluxograma a partir do progra- 
ma Registro Pessoal de Cheques, pois ele 
servirá de modelo para a elaboração de 
um sem-número de programas graças às 
suas soluções lógicas associadas às possi- 
bilidades do BASIC. 





Engenheiro Eletricista, formado pela Escola 
Politécnica da Universidade de São Paulo, em 
1968, Marcelo Renato Rodrigues tem vários 
cursos na área de Sistemas. Trabalha atual- 
mente na CESP — Companhia Energética de 
São Paulo como Supervisor de Setor, respon- 
sável pelo desenvolvimento e implantação de 
Sistemas Técnicos na área de distribuição de 
energia elétrica. 
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Figura 2 





Figura 3 


LANCAMENTO 14 


No. 


CORRECAO (S ou N)? 
APRESENTACAO DOS LANCAMENTOS 


A PARTIR DO DIA 3/1 
LANC. 4 CHEQ 4 MES/DIA 





422213 
452214 
422215 
oP 301 
452217 
452218 
452219 
711500 
711501 
711504 








INTRODUCAO 
+ MENSAGEM>ULTIMO LANC. = 
>PARA SAIR DESTA ROTINA, ENTRE COM (+) NA LINHA <No. DO CHEQUE> 
>TECLE APENAS <ENTER> PARA MES OU DIA REPETIDO 


MES 


DO CHEQUE===> 7 
MES==========.==)> 7 
DiA===uz====2...> 7 
DESCRICAO ======= 
CODIGO==========> 
VALOR=====sssse=)> 7 






17 3  SUPERMERC 1 73.422 262.588 
17 4 ALUGUEL 2 180,726 81.862 
17 7 CONDOMINIO 2 35.042 46.820 
1/10 SALARIO 9? 200.710 247, 530 
1/17 TELEFONE Fa 8.323 239.207 
1/18 SEGURO AUTO 6 45,000 194,207 
1/19 DR. CARLOS s 15,000 179.207 
1/19 RESTAURANTE 1 7.B00 171,407 
1/23 DENTISTA s 34,930 136.477 
1/28  CART.CRED. 8 18,000 118, 477% 


*MENSAGEMDTECLE <ENTER> PARA CONTINUAR OU (+) PARA SAIR 


A PARTIR 


ALIMENTACAO 
MORADIA 

LAZER 

ESCOLA 

SAUDE 
TRANSPORTES 
SERV. PUBLICOS 
OUTROS 
DEPOSITOS 


DE LANCAMENTOS 


O *+w+DISPONIBILIDADE = 600 





LANC. ANT. ==> 2 
715511 
2 


15 

? CONDOMINIO 
e des 

38000 


ATE” O DIA 15/72 
DESCRICAO CoD VALOR 





TOTAIS POR CATEGORIA 


DO DIA 3/1 ATE” ODIA 15/72 





VALOR PORCENTAGEM 
81222 14.7 
253768 45.8 
50000 e 
o o 
49930 9 
55000 9.9 
8323 1.5 
56000 10.1 
200710 36.2 
TOTAL GASTO 554243 


TOTAL DEPOSITADO 200710 
*4+MENSAGEM>TECLE <ENTER> PARA SAIR 















Figura 4 


TOTAL 
PORCENTAGEM 


CHEQUE MES DIA SAQUE MEP ALINENTAC 
«e SALDO AM. 

AZ] JM 3 SUPERNERC nam 
ASTRA JAM 4 ALUGUEL 

AZIRIS JAM 7 CONORINIO 

DP JOL JAM 10 SALARIO 

45217 JAM 1) TELEFRE 

452210 JAM 18 SEGURO AUTO 

AST2AS JAM 19 DR. CARLOS 

THASOO JAM 19 RESTAMRANTE 7,800 
PULSO JAM 23 DENTISTA 

TLISOM JAM 78 CART.CRED. 

TinS06 FEV 2 GASOLINA 

TIS FEV 3 EMPREGADA 

TU1S08 FEV 3 MOTEL CARO 

MASS1 FEV 15 comONInIO 


“zm 
“7 


ACOMPANHAMENTO DE OPERACOES BANCARIAS 





MERO DATA DESCRICAO eeseesecessracccsssnvecs VALOR DA OPERAÇÃO BANCARIA POR CATEGORIAS oesanserssemessssassss 








MORADIA LAZER  EMICAC SAUDE TRANSPORT SERV.PUB OUTROS DEPOSITOS 
190,72 
3. 
0,0 
“3a 
5.000 
13,000 
3.930 
18,000 
0.000 
38.000 


BI so000 º 
“1 


“9 


10 (2) no 

















dB/ 


dB/MICRO 


AV. ALFONSO BOVERO 218 


SÃO PAULO S.P. 
BRASIL 
TEL.:(011)263-0711 
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JORNAL DO USU, 
TREINAMENTO 


HOT LINE 


IO 
ICO 


TREINAMENTO AVANÇADO dB/Treino A 


TREINAMENTO EM DISCO 
SEMINÁRIOS PARA EXECUTIVOS 
APOIO A AUTORES INDEPENDENTES 


dB/Treino D 
dB/seminários 
dB/ Aplicativos 








DIA LANC. ANT. ==> 3 


SALDO 








SALDO 


236.010,12 
22, 508,12 
81,062.12 
46,820.12 
247,330.12 
2.7.2 
194,207.12 
179,207.12 
171,407,12 
136,477,12 
118,477.12 
108,477,12 


SUPORTE 


TOTAL 
AOS 


USUÁRIOS 
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CONTROLE SUAS OPERAÇÕES BANCÁRIAS 


Registro Pessoal de Cheques 





1 GoTOL7 
2 PO=INKEYS: IFPS=""THENZELSEP=VAL (P$) RETURN 

3 OS=INKEYS: IFOS=""THENSELSEO=ASC (08) RETURN 

4 FORK=1TONL! IFAL=BI%(K) ANDEX=BZ% (K) THENL =: Ou 1 5 RETURN 

S NEXTKIPRINTMS: " INEXISTE LANCAMENTO NESTA DATA-TECLE <EN 
TER>"* GOSUB3: RETURN 

6 PRINTO448. FE INPUT" (1) No. DO CHEQUE===> "sAS(I)> 

7 IFAS(I)="+"THENPOKE 16916,01GOTOZO 

B ASCI)=RIGHTS(AS(I).6) 
9 BIX(I)=Os INPUT" (2) 
T)=OTHENBIZ(I)=BIK(I-1) 
10 BZ%(1)=0s INPUT" (3) 
41) =OTHENBZ% (1) =B2% (1-1) 
41 INPUT" (4) DESCRICAO=======m > *5CO(1)ECS(I)=LEFTS(CO( 
Doi) 

12 INPUT"(S) 





MES msemmceeeeme) “SBIXCTISIFBIAA 
DlAcmemeemmenem) “;B2%(1): IFEZ% 


CODIGO =emmumun=> “sDXC(I)S INPUT" (6) va 
LORssnnaennen> "SBW(T) 
13 PRINTO96O, "CORRECAO (S ou N)7"5!GOSUBI 
14 IFO=B3THENPRINTOV6O, STRINGS (60.32) 1 !PRINTOOIZ.*"1: INPU 
T"No. DA LINHA, DADO CORRETO": 11. X9: GOSUB1100:PRINTOEIZ. ST 
RINGS (60, 32) 11607013 





NEML=600!NL=0FS="0, 000, nar: 





CMS" ce sMENSAGEM>" E DIMP (9) VO=" ana. 1 

19 DIMAS (400), B1% (600) + B2% (600) + C8 (600) + DX (600) » BR (600) E 
0(600) ELW(9) MECIZ) 

CLS:PRINTOS. "RPC VERSAO 2 - REGISTRO PESSOAL DE CHEQUE 


8 


sr 
PRINT976, “ESCRITO POR MARCELO RENATO RODRIGUES” 
PRINTO33S." (1) ADICIONAR LANCAMENTOS” 

PRINTO399," (2) CARREGAR LANCAMENTOS DA FITA” 
PRINTO463." (3) APRESENTAR LANCAMENTOS NA TELA” 
PRINTOS27." (4) ALTERAR LANCAMENTO” 

PRINTOS91," (5) IMPRIMIR PLANILHA” 

PRINTÕ6SS." (6) GRAVAR LANCAMENTOS" 

PRINT9719."“ (7) FIM DO PROCESSAMENTO” 

PRINTOEIZ, "QUAL A ROTINA DESEJADA?" : GOSUBZ 
IFP<10RP>7THEN6S 

IFP>ZANDP<7ANDNL=OTHENPRINTOB96 85 “ESCOLHA INCOMPATIV 
EL-TENTE DE NOVO": PRINTO6I2, STRINGS (60. 32) 11 GOSUB1S00:PRI 
NT9896. STRINGS (60. 32) + +GDTD6S 

BO IFP>ZANDP<7THENS6 

85 CLS: ONPGOTOLOO, 200, 300, 400. 500. 600, 700 

B6 B3=0: IFP=6THENINPUT"MES DE INICIO-MESMA DATA DO ARQ. A 
NT. TECLE <ENTER>":B3:L1=11GOTOSS 

B7 INPUT"MES DE INICIO-MESMA DATA DO INICIO DA SESSAO TEC 
LE <ENTER>"1ES 

BB IFBJ=0THENGOTO9Z 

90 INPUT"DIA DE INICIO”: B4:AZ=E3: BX=B41 GOSUB4: IFO<>1THENS 
OELSELI=t 

92 IFP=40RP=6THENES 

94 BS=0: INPUT"MES DE FIM-SE COINCIDE COM O ULTIMO LANCAME 
NTO, TECLE <ENTER>"1BS 

96 IFBS=OTHENLF=NL:GOTOSS 

78 INPUT"DIA DE FIM": B6: AZ=BS: BX=B6: GOSUBA4: IFO<>1 THENGOTO 
PBELSELF et 

99 GoToss 

100 PRINT913." INTRODUCAO DE LANCAMENTOS” 

es PRINTMS: “ULTIMO LANC. = “INI” eesDISPONIBILIDADE = = 
ML 

110 PRINT">PARA SAIR DESTA ROTINA. ENTRE COM (+) NA LINHA 
<No. DO CHEQUE >" 

115 PRINT">TECLE APENAS <ENTER> PARA MES OU DIA REPETIDO” 
PPRINTIPOKE16916,5 

120 IFNL=OTHENINPUT"SALDO ANTERIOR" + ER (O) 

125 LI=NL+1 

130 I=NL+1:PRINTOSZO, "LANCAMENTO" 5 14” MES LANC, ANT. == 
> BLKCI-1D DIA LANC. ANT. ==>"1BZK(I-1) 

135 GOSUB6:NL=NL+1!CLS:GOTO130 

200 PRINTO404,M8: “APERTE <PLAY> NO GRAVADOR”: INPUT"QUAL O 
NOME DO ARQUIVO":OS 

205 PRINTO404. MS: "PROCURANDO O ARQUIVO >>>>> “108 

210 INPUTO-1.A8.B1%, BZ%.C8.DX. E. EM (O) 

215 IFAS<>OSTHENZIO 

Z20 PRINTO404, MS: "CARREGANDO O ARQUIVO >>>>> “108 

225 FORI=ITOML 

230 INPUTO-1.ASCI). BIXCI)  BRLCI)CO(I) DALI). BOCT) ECT) 
235 IFAS(I)= THENZ40ELSENEXT I 

240 CLS*PRINTÕES. “LANCAMENTOS DISPONIVEIS NA MEMORIA“: PRI 
NTENL=I=1 

245 PRINT"NO. DE LANCAMENTOS=" NL IPRINT'SALDO=Cr 8" +: PRINT 
USINGF Ss EM (NL) 

250 PRINTO704.M8:"TECLE <ENTER> PARA CONTINUAR": GOSUBS:LI 
=11+G0TOZO 

300 GOSUB1200:PRINT9IS, “APRESENTACAO DOS LANCAMENTOS": PRI 
NT: GOSUBJOS! GOSUB310:GOTO31S 

305 PRINTTAB(1L1)"A PARTIR DO DIA ":BZKCLIDIN/"EBIXILIDAS 
ATE* O DIA "FBZK(LF)5"/"SBIXILF) RETURN 

FIO PRINT"LANC. & CHEO 4 MES/DIA DESCRICAO COD va 
LOR SALDO": PRINTIRETURN 

315 POKEL6916. SILT=256 

320 FORI=LITOLF:LT=L T+641GOSUB1000 

325 IFLT=896THENPRINTMS: "TECLE <ENTER> PARA CONTINUAR OU 
(») PARA SAIR": :GOTOIBO 

330 NEXTI!PRINTIP6O. "QUER A APRESENTACAO DOS TOTAIS POR C 
ATEGORIA (S ou N)7"1:GOSUBZ 

335 IFO=78THENGOTC378 

340 POKE16916.0:CLS:PRINTIZO, "TOTAIS POR CATEGORIA”: GOSUE 





dsnsasasdasu 








305 
345 PRINT92I4, "VALOR"! 1 PRINTOZIO, "PORCENTAGEM" 





350 PRINT"AL IMENTACAO”: TAB (19)ELW(1)STAB(AZIP(I) 

355 PRINT"MORADIA": TAB(19) EL (2)! TAB(42)P(Z) 

360 PRINT'LAZER": TAB(19)ELWCT)STAB(4ZIP(3) 

365 PRINT"ESCOLA"S TAB (19)ELW(4)3 TAB(4ZIP(4) 

370 PRINT"SAUDE”: TAB (19) ELW(S)STAB(42)P(S) 

371 PRINT" TRANSPORTES”: TAB(19)ELW(6) S TAB(42)P(b) 

372 PRINT"SERV. PUBLICOS": TAB(19)ELW(7)F TAB(42)P(7) 

373 PRINT"DUTROS”: TAB(19)ELW(B)3 TAB(42)P(B) 

374 PRINT"DEPOSITOS”: TAB (19)ELW(9) STAB(42)P(9) 

375 PRINTTAB(20) “TOTAL GASTO": TAB( 6) TOR 

376 PRINTTAB(20) "TOTAL DEPOSITADO": TAB(36)ELM(9) 

377 PRINTOPBO, M81"TECLE <ENTER> PARA SAIR"! 1 GOSUBI 

378 POKE16916,0:GOTOZO 

380 GOSUB3: IFO=42THENGOTO378 

382 IFO<>13THENSZS 

384 CLSILT=256:GOTOJIO 

400 PRINTTAB(4)"<DESCE> AVANCAR LANCAMENTO” TAB (35) "<SOBE 
> RETROCEDER LANCAMENTO” 

402 PRINTTAB(4)" (I)NSERIR"S TAB (35) * (S)UBSTITUIR 

404 PRINTTAB(4)"(DIELETAR"STAB(3S)" (+) SAIR DA ROTINA” 
405 PRINTTAB(15)"TECLE SUA OPCAO” 

406 GOSUB310!POKE 16916, 51 Im IHLT=320 

408 G0SUB1000 

410 GOSUB3: IFO=42THENPOKE 1 6916, 0!GOTOZO 

415 1FO=101FI<NLTHENI=1+1"GOTO408: ELSEPRINTOLT.M$1"O ARQU 
IVO TERMINOU": GOTO41O 

420 1FO=911F1>1THENI=1-1:60TO408: ELSEGOTO4S 10 

425 IFO=73THENSSO 

435 1FO=83THENGOSUBS: CLS! GOTO408 

440 IFO<>6BGOTD408 

445 FORI=ITONL-IFAS(J)=AS(J+1) EBIX(II=BIKIA) E BZL(I) =BZ% 
(J+1) 208 (1) =0C8(J+1) E DLC) =DA (T+) BM (Tm BM (41) E NEXTIENL = 
NL-1:60TO410 

450 FORJ=NLTOI+ISTEP-LZAS(I+1)=ASCI)EBLXCIHI) =BIX(T) E BZA( 
J+1)=B2%(I)ECS(J+1)=C8(J)EDA(IHL) = DA(T) E BM (J+1) = BM (J) E NEX 
TISNL=NL +11: 1=1+1:GOSUB6!CLS:GOTO4SO 

500 PRINT"INICIALIZE A IMPRESSORA E TECLE <ENTER>":GOSUBZ 
SOS IFO<>1STHENSOOELSELPRINTTAB (20) "ACOMPANHAMENTO DE OPE 
RACOES BANCARIAS":LPRINT 

S1O LPRINTCHRS (15): GOSUB1 200: DATA" JAN", “FEV”, “MAR”, "ABR", 
“MAI”, "JUN", "JUL", "AGO", "SET", “OUT”. “NOV”, "DEZ": FORK=1TOL 
2: READMS (K) E NEXTK: RESTORE 

SIS LPRINT"NUMERO DATA DESCRICAO ";STRINGS(25. 42): "VA 
LOR DA OPERACAD BANCARIA POR CATEGORIA”: STRINGS (24.42)! TA 
B(120) "SALDO" 

520 LPRINT"CHEQUE MES DIA SAQUE/DEP": TAB (26) "ALIMENTAC":T 
AB(38) "MORADIA"! TAB (49) "LAZER": TAB (58) “"EDUCAC"s TAB (68) "SA 
UDE": TAB(76) "TRANSPORT"! TAB (B6) “SERV. PUBL”; TAB (98) "OUTROS 
“Ss TAB(106) "DEPOSITOS" 

S22 LPRINT" <<< “STAB(IS) "SALDO ANT."STAB(116)""FILPRINT 
USINGHS EM (LI-1) 

S25 FORI=LITOLFILPRINTAS (J)S TAB(7)MS (BIZCJ))ITABCII) "NES 
PRINTUSING" 04" 3 BZ%(J) 5 !LPRINTTAB(15)C8(J)+ 

S60 ONDX(J)GOTOS61. 562.563, 564.565. 566. 567. 568. 569 

s61 
sz 











FEEL 


LPRINTTAB(76)""s1GOTOS7O 

567 LPRINTTAB(86)**::GOTOS70 

LPRINTTAB(96)" "+: GOTOS7O 

569 LPRINTTAB(106)"* 

S70 LPRINTUSINGFS: BM (J)s FLPRINTTAB(116)""5ILPRINTUSINGHSS 
EMI) 

575 NEXTJSLPRINTSTRINGS (130,45) 

SB0 LPRINTTAB (6) "TOTAL": :KA=161FORK=1 TOP: KAnKA+10:LPRINTT 
AB(KA)* "5 SLPRINTUSINGE SS ELO (K) 5 ENEXTKELPRINTO 

585 LPRINTTAB (4) "PORCENTAGEM" !KA=20: FORK=1 TOP: KA=KA+1OSL 
PRINTTAB (KA) ""s ELPRINTUSINGYS: P(K) 5 ENEXTKELPRINT" 

590 GOSUB1300!LPRINTCHRS (18): GOTOZO 

600 GOSUB1200:PRINTMS: “TECLE <PLAY> E <RECORD> SIMULTANEA 
MENTE” 

605 INPUT"QUAL O NOME-CODIGO QUE IDENTIFICARA! O ARQUIVO" 
MASLI-L) 

610 IFLI-1=OTHENBIX (0) =0tBZ%(0) mO!CS(O)="A":DK(O)=11BW(O) 
=0 

615 FORI=LI-LTONLSPRINTO-I ASCI) BIXCI)» BZLCI) CSI) DACI 
) + BWCID EMCIDENEXTI 

620 PRINTO-1,"+",0,0,"A”,0,0,0:G0TOZO 

700 END 

1000 PRINTOLT.""; !PRINTUSINGES! 15: PRINTUSING"X X"rASCI 
JPEPRINTUSING” MM/"FB1XCI)PSPRINTUSINGCOM MEBZACT)PEP 








RINTUSING"% XºSCOCI)FEPRINTUSING” MM" DACI)FEPRI 
NTUSING”  MMemamm,"SBWCI)SSPRINTUSING” mmnana, "SENCT)S 
*RETURN 


1100 ONI1GOTO1105, 1110,1115,1120,1125, 1130 

1105 AS(I)=RIGHTS (X8, 6) RETURN 

1110 BLX(I)=VAL (X8) E RETURN 

1115 B2%(1)=VAL (X8) RETURN 

1120 CS(I)=LEFTS 11) RETURN 

1125 DX(I)=VAL (X8) RETURN 

1130 BW(1)=VAL (X8) RETURN 

1200 FORK=1TOPLELM (K) =O! NEXTK: TDE=Os TER 

1205 FORII=LITONL: IFDX(II) =STHENESCIT)=ERCII-1)+BW (IT) :GO 
T01210 

1208 EMCII)=EMCII-1)-BO(II)ETOM=TOS-BRITI) 

1210 EIW(DACIID)=ELO(DECITO)*BOCTTIEMENTIT 

1215 FORK=1TO9:P(K)=INT (ELSA) /TERSLOODS. 5) 7107 NEXTK 
1220 RETURN 

1500 FORNN=1 0400: NEXTINN: RETURN 
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O micro NAJA foi desenvolvido utilizando os mais modernos padrões de arquitetura de Microcomputador, 
atingindo uma ampla faixa, desde os computadores pessoais até os utilizados em empresas 
de pequeno e médio porte. Uma de suas grandes vantagens é a sua versatilidade, ou seja, você poderá 
adquiri-lo na sua versão mais simples, podendo você mesmo expandi-lo à medida de suas necessidades, 
a um baixo custo 


CARACTERISTICAS TÉCNICAS 





e 48K bytes de memória RAM AGORA TAMBEM ft OM - 
e 16K bytes de memória ROM . 
e Clock de 3,6 MHz ou 2,1 MHz comutado por Soft / 

e Saída para impressora paralela é CP n CLOCK DE 5 MHZ 

e 6 conectores para expansão no próprio gabinete po 

e Microprocessador Z-80A : UMIDADE DE DISCO DE e) 

e Vídeo de 16 linhas por 64 ou 32 colunas «VIDEO À CORES 

e Interface de cassete para 1.500 ou 500 BPS 

e Linguagem Basic na ROM do sistema = SN TE Tizi ADOR DE V OZ 

e Software compatível com TRS-80 mod. tl 

ACESSÓRIOS 

e Monitor de vídeo de 12” verde profissional KEMATHUN LTDA. 

e Interface para 4 unidades de disco de 51/4" de dupla dens. 

e Unidade de disco face simples ou dupla Av. Contorno, 6048 - Savassi - Fone: 225-0644 
e Interface para 4 MHz de Clock Telex-(031)3074-KEM!-BR Belo Horizonte-MG 








Se você é livreiro, bibliotecário, gosta ou tem necessidade 
de lidar com muitos livros... Aqui vai uma ótima pedida! 


Biblioteca no micro 


Regina Basilio 


om este programa para o D-8001 e compatíveis será 
fácil localizar um livro através do seu número, título 
ou assunto, arquivados anteriormente na memória. 
Quando você for procurar um determinado livro no arquivo, 
basta digitar o seu nome ou o seu número e todos os dados 
aparecerão no vídeo. Para terminar uma listagem no vídeo bas- 
ta escrever FIM no campo ENTRAR O NUMERO DO LIVRO. 

Podem ser armazenados até SO livros de cada vez, em siste- 
mas com 16K de memória. Em computadores com capacidades 
de 32K e 48K este número pode ser ampliado para 100 ou 150 
livros. 

Através dele, você pode arquivar o título e os dados que de- 
sejar a respeito de cada livro, em fitas cassete, que poderão ser 
atualizadas, acrescentando-se novas informações quando neces- 
sário. 

Você poderá também fazer listagens na impressora (figura 
1) de todos os livros arquivados e, no final, o computador lhe 
dará a quantidade exata e o valor total destes livros. 

Com o menu deste programa você poderá, ainda, ter uma 
lista de livros de determinado assunto, bastando para isso es- 
crever o assunto que deseja e aparecerão no vídeo as obras ca- 
talogadas que tratam deste assunto escolhido. 

Enfim, com este programa você vai manter os livros que de- 
sejar sob seu inteiro controle. 





RELATORIO DO INVENTÁRIO NO. DA PAGINA 1 
N. DO LIVRO 
AUTOR: 
EDITORA: 

N. CATALG: 


DATA COMPRA: O VALOR APROX: O 


N. DO LIVRO TITULO: 
AUTOR: ASSUNTO: 
EDITORA: EDICAO: 


N. CATALG: DATA COMPRA: O VALOR APROX.: O 





Figura 1 — Exemplo de listagem de livros na impressora 





Regina Basilio é formada em Economia pela Fundação Álvares Pentea- 
do (São Paulo). Fez cursos de programação BASIC e COBOL e possui 
um microcomputador D-8001, da Dismac, há um ano, do qual desen- 
volve programas. 
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Programa Inventário de Livros 


9*"10 REM + INVENTÁRIO DE LIVROS + 

20 REM + P/ D.8001 E COMPATIVEIS + 

30 REM » CONFIGURACAO: 16 K RAM E IMPRESSORA + 

40 CLEAR 7000 

50 DIM N$(50), T$(50) + AS (SO), S$ (50), P$(SO)» 16150)» 8050)» DC5O), V (SO) 
60 H1$="RELATORIO DO INVENTÁRIO viH2s= NO. DA PAGINA * 
70 17=0:55=0:L=0:P=0:N=50 

BO CLS:PRINTTAB(10)5"s » INVENTARIO DE LIVROS » +": PRINT 

90 PRINTTAB(20); "es MENU s e*:PRINT 

100 PRINT "PARA FAZER ARQUIVO NA MEMORIA DIGITE 1º 

10 PRINT "PROCURAR UM LIVRO PELO NUMERO DIGITE 2* 

120 PRINT "PROCURAR UM LIVRO PELO TITULO DIGITE 3º 

130 PRINT *PROCURAR PELO ASSUNTO DIGITE 4º 

140 PRINT "LER ARQUIVO NA MENORIA DIGITE 5º 

150 PRINT "DAR O VALOR DO INVENTARIO DIGITE 6* 

160 PRINT "FAZER LISTA PARA GRAVACAO DIGITE 7º 

170 PRINT "PARA MUDAR UM ITEM NA MEMORIA DIGITE 8º 


180 PRINT "LISTAR O ARQUIVO NA IMPRESSORA DIGITE 9º 


190 INPUT O: IF (Q(1) OR (09) THEN GOTO BO 
200 ON Q GOTO 210,400,480, 570,60, 790, 890, 990, 1360: END 


210 FOR K=i TO NEIFVIK) <> O NEXT K ELSE GOTO 220 

220 FOR J=K TO N 

230 CLS: PRINT "PARA TERMINAR UMA LISTAGEM, ESCREVA ( FIM)" 
240 PRINT "O ULTIMO NUMERO FOI *;N$(J-1), "INDICE"; 9 

250 INPUT “ENTRAR NUMERO DO LIVRO *5K$: LFK$="FIM"THENSSO 
2b0 N$(J)=K$ 

270 INPUT “ENTRAR O TITULO DO LIVRO, . 

280 INPUT "ENTRAR AUTOR (SEM VIRGULAS 

290 INPUT “ENTRAR ASSUNTO, . 

300 INPUT *ENTRAR EDITORA & DATA, 

310 INPUT “ENTRAR EDICAO. 

320 INPUT “ENTRAR N. DO LIVRO CATALOGADO 

330 INPUT “ENTRAR DATA DA AQUISICAO, . 

340 INPUT "ENTRAR VALOR APROXIMADO/PRECO. + 
350 INPUT “CORRETO? S/Nº 76: LFZ$="NºGOTOZIO 

360 PRINT "RELATORIO < "sN$(J)5"ARQUIVADO *;: FOR 1=170200:NEXTI 
370 NEXTS 

380 N$(J)="FIM" 

390 PRINT, *CFIM DO ARQUIVO, , 
400 CLS 

410 INPUT “ENTRAR N. DO LIVRO P/ PESQUISA (FIM P/ PARAR)"; M$ 
420 IF N$="FIN" GOTOLISO 








+ 6OTOL350 
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430 FORJ=ITON 

440 TFNS(J)=*FIN“PRINTECFIN DA LISTAGEM... >*:GOTOL350 

450 TFMSCONS(JINEXTI 

460 GOSUBIZ40 

470 GOTOMO 

480 K=1:0LS 

490 INPUT “ENTRAR TITULO P/ PESQUISA (FIM P/ PARAR)": M$ 

500 1F M6="FIN*GOTOLI5O 

540 FOR J=KTON 

520 XS=LEFTS(T$(9), LENIMS)) 

S30 TF N$(0)="FIN"PRINT “(FIN DA LISTAGEM... .)":BOTO135O 

540 IF MSC)XSNEXTJELSEGOSUBI240 

550 K=]+1:1FKON Kan 

560 BOTO49O 

570 K=i:cLs 

580 INPUT "ENTRAR ASSUNTO P/ PESQUISA (FIM P/ PARAR); M$ 

590 IF M6=*FIN"GOTOIISO 

600 FOR J=KTON 

610 K$=LEFTS (96 (9) » LEN(M$)) 

620 TF N$(J)="FIM"PRINT "CFIM DA LISTAGEM... )*:GOTOL350 

630 IF M$C>XINEXTJELSEGOSUBI240 

640 K=]+1STFKON K=N 

650 GOTOSGO 

bb0 CLS:REM + LER LISTAGEM NA MEMORIA + 

670 INPUT * ENTER QUANDO O GRAVADOR ESTIVER PRONTO. "578 
680 FORJ=1 TO N 

690 INPUT 8-1, NBC), T$4I)» AS CI) > SB(I) PSI)» T$4I) + LAI) DID) VII) 
700 1F J=NTHEN N$(9)="FIM" 

710 GOSUBLZ4O 

720 1F V(J)=060T0750 

730 IF N6(J)="FIM"THENGOTO730 

740 NEXTI 

750 PRINTOB96» "ESPACO LIVRE = *LIV(Z6)3 

760 PRINTºLISTAGEM CARREGADA NA MEMORIA, . .. 

770 IF Pi=1 PRINT"PRINTING CONTINUAR. . « *:BOT01400 

780 GOTOL350 

7% CLS:T=0:5=0 

800 FORJ=1 TO N 

B1O IF V(J)=060T0BSO 

820 1F Né(J)= "END*GOTOB6O 

B30 T=T+1:S=S+V(J) 

B40 GOSUBLZ40 

BS0 NEXTU 

B60 PRINT "TOTAL DE LIVROS DA LISTA = "sT:PRINT 

870 PRINT "VALOR TOTAL DOS LIVROS = 8"55:PRINT 

880 GOTOL3SO 

890 REM » ARQUIVO DE DADOS EM CASSETE + 

900 CLS: INPUT"PREPARE CASSETE P/ GRAVACAO. QUANDO ESTIVER PRONTO, APERTE ENTER. "528 
910 FOR J=1TON 

920 1F VCJ)=0THEN N$(9)="FIN* 

930 CLS:PRINT "COPIAR. ...N. DO LIVRO *SNS(5)5 

940 PRINT 0-1, N$(])» T$4J) + ASCI)» S$(D)PSLT), L$(I) LSD)» DAI) VI) 
950 GOSUB 1240:PRINT “REGISTRO COPIADO. ..*s 

960 FORI=1TOZS0:NEXTI 

970 IFNSCJ)="FIM"  PRINT"LISTA DO TAPE-COPIADA":GOTOL350 

980 NEXTU 

990 CLS:REM + MUDANCA DE ALGUM ITEM NA MEMORIA + 
1000 INPUT "ENTRAR NUMERO DO LIVRO À SER MUDADO. 
1010 1F K$="END"GOTOLI5O 
1020 FORJ=1TON: IFNS(J)=K$60701050 
1030 TF N6(9)="FIM"SPRINT'CH, DO LIVRO NAO ENCONTRADO. FIM DA LISTA. 2560701000 


(FIM P/ PARAR) 5kS 


1040 NEXTI 

1050 GOSUB 1240 
1060 PRINTO6SO, "P/ MUDAR : NO, DO LIVRO, ENTRAR B* 
1070 PRINT "TITULO. ..... ENTRAR Tº, "AUTOR... «+ ENTRAR A* 
1080 PRINT "ASSUNTO, . . « «ENTRAR Sº, "EDITORA. «+ ENTRAR Pº 
1090 PRINT *EDICÃO. .. «ENTRAR 1º"N, LIV, CATLO, ENTRAR L* 
11400 PRINT "DATA... + «+. «ENTRAR D*s "VALOR, 000 uu o + ENTRAR VºS 
1110 INPUT 79 
1120 1F 78="B* INPUT"ENTRAR NOVO NUMERO "sN6 (9) 
1130 1F 28="T" INPUT"ENTRAR NOVO TITULO "sT$(9) 
1440 IF 26="A" INPUT"ENTRAR NOVO AUTOR"SAS(J) 
1150 1F 78="5* INPUT*ENTRAR NOVO ASSUNTO"; 58 (J) 
1160 1F 78="P* INPUT"ENTRAR NOVA EDITORA"; P$(9) 
ALTO TF 28="1* INPUT"ENTRAR NOVA EDICAO"; 16(J) 
11480 TF 28="L* INPUT"ENTRAR NOVO N. DO LIVRO CATLE, *5L6(9) 
1190 TF 78="D" INPUT"ENTRAR NOVA DATA*5D(J) 
1200 1F 26="V* INPUT"ENTRAR NOVO VALOR"; V(J) 
1210 6OSUB1240 
1220 INPUT "CORRETO? S/N"576: TF 28="Nº THEN GOTOLOSOELSEGOTO1230 
1230 INPUT "MAIS MUDANCAS? S/Nº; 78: F2$="5*THENGOTOL0S0ELSEGOTOL000 
1240 015: 
1250 PRINT "NO. DO LIVRO 
1260 PRINT "TITULO 
14270 PRINT “AUTOR 
1280 PRINT "ASSUNTO 
1290 PRINT "EDITORA 
1300 PRINT "EDICAD 
1310 PRINT *N, DO LIVRO CATLG. 
1320 PRINT "DATA DA AQUISICAO 
1330 PRINT "VALOR APROX. 
1340 PRINT: PRINT: RETURN 
1350 INPUT "PARA VER MENU, APERTE ENTER..*; 7$:G0T080 
1360 REM * PRINT LISTING » 
1380 LPRINT CHR$(143)5CHR$ (141) 
1390 GOSUBIS3O 
1400 FOR J=1TON 
1410 1F N$(J)="FIM":GOSUBL6OO:LPRINT"TOTAL DE LIVROS= "5 TTs TAB(25) "5 
1415 LPRINT"VALOR TOTAL = "5555 TAB(S0) "VALOR APROX, = "555/TT 
1420 IF N$(J)="FIM"SLPRINT: LPRINTºFIM DO RELATORIO *:GOTO1350 
1430 LPRINT *N, DO LIVRO “SNS (9); TAB(60) "TITULO: "5 TS) 
1440 LPRINT "AUTOR: *5AS(J)3TAB(60) "ASSUNTO: "556(]) 
1450 LPRINT "EDITORA: "5P$(J)s5 TAB (60) *EDICAO: 51843) 
1460 LPRINT "N. CATALG: "5L6(J)5 TAB(30) "DATA COMPRAS "5D(J); TAB (60) * 
1465 LPRINT "VALOR APROX,: "5 V(9)* 
1470 LPRINT N 
1480 L=L+5 
1490 TT=TT+1:55=55+V (9) 
1500 1F L>55 GOSUE 1530 
1510 NEXTJ 
1520 GOTO 1350 
1530 REM + CABECARIO + 
1540 L=0:P=P+1 
1550 IF P>ISLPRINT CHR$ (140) 
1560 LPRINT TAB(40);H1$;H285P 
1570 LPRINT 
1580 L=L+3 
1590 RETURN 
1600 REM * LISTAGEM ADICIONAL + 
L6LO INPUT*TEM OUTRA FITA PARA IMPRIMIR? S/Nº578 
1620 IF 76="Y* Pi=1:60T06b0 
1630 RETURN 


*3NSt) 
“sTót) 
"5 AS() 
“588(9) 
“sPS(d) 
*E16(0) 
“SL$(]) 
*sDig) 
"svío) 


A Rio Micro tem uma novidade para você no Rio de Janeiro 


LOCAÇÃO DE MÁQUINA 


* Aqui você paga por tempo e utiliza nossos micros para programar, aprender, brincar e jogar 

* Venda de: Micros, interfaces, periféricos, fitas, jogos, programas, suprimentos, livros, revistas, etc. 
* Curso de basic: Normal, noturno, e instrução programada, onde o professor é o computador 
Rua Visconde de Pirajá, 330 loja 314 — R.J. (021) 521-4888 





Computadores Ltda. 
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Usuário do Apple: com a ajuda deste artigo você poderá ampliar o espaço útil 
de discos formatados pelo DOS 3.3 e seus compatíveis 





Crie um espaço extra 
em seu disco 


Nelson Filho 


uantas vezes nos deparamos com o problema de falta 
de espaço em disco? Várias, não? Principalmente 
quando dispomos de apenas um drive e temos que 
conviver com a maçante troca de discos durante a execução 
de um programa com grande volume de dados! E que tal seria 
se conseguíssemos um espaço extra em nossos discos? É o que 
veremos a seguir, a partir de uma discussão sucinta sobre a es- 
trutura do disco formatado pelo DOS 3.3 e seus compatíveis. 

Vamos começar estudando a anatomia do disco. Sabemos 
e o disco é dividido em 35 trilhas, cada qual com 16 setores 

e 256 bytes. Deste total, o DOS reserva para si quatro trilhas: 
0,1,2e 17. As três primeiras guardam o próprio DOS para ser 
carregado na memória, enquanto que a trilha 17 é destinada ao 
Catálogo (Directory) e ao VTOC (Volume Table of Contents). 

O Catálogo mantém como registro, entre outros, o nome, 
tipo e posição de cada arquivo, enquanto que o VTOC apresen- 
ta um mapa(Track Bit Map), distinguindo quais setores estão 
livres e quais estão ocupados. 

Neste mapa do VTOC, cada trilha é representada por quatro 
bytes, dos quais apenas os dois primeiros são significativos (os 
demais não são usados). Estes dois bytes, com seus 16 bits,re- 
presentam a situação dos 16 setores. Conforme o bit for igual 
a 1 6u0,o setor correspondente estará livre ou ocupado, res- 
pectivamente. Assim é que, para as trilhas 0, 1, 2 e 17, seus 
bytes representativos serão iguais a zero, indicando que toda a 
trilha está ocupada, reservada, no caso, para o DOS. 

Agora vejamos: por que não utilizarmos as trilhas 1 e 2 para 
o nosso próprio arquivo? É claro que assim perdemos o DOS, 
mas isso nem sempre significa um problema, uma vez que sem- 
pre poderemos instalar o sistema com um disco padrão. Em 
compensação, ganhamos 8192 bytes (8Kb), o que muitas ve- 
zes pode ser mais útil. Para isso, tudo que precisamos fazer é 
alterar aqueles bytes significativos, no mapa do VTOC, perti- 
nentes às trilhas 1 e 2, para o valor 255. Desta forma teremos, 
nos 16 bits referentes a cada uma das duas trilhas, o valor 1, in- 
dicando que todos aqueles setores estão livres. 
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É claro que esta operação não deve ser feita para a trilha 17, 
por razões óbvias. O Catálogo e o VTOC são imprescindíveis 
ao sistema e por isso mesmo não devem ser remanejados (a lo- 
calização de ambos nessa trilha é, até certo ponto, estratégica). 
No entanto, — e talvez vocês já tenham pensado nisso — por 
que não aproveitamos também a trilha 0? Aparentemente não 
há problema, mas acontece que q DOS utiliza o zero para in- 
dicar o fim do Catálogo e dos Indices (Track /Sector List), o 
que inviabiliza o manuseio de dados na trilha O sem outras 
modificações bem mais complexas na estrutura do sistema — 
não significando, porém, que a trilha fique totalmente inútil: 
ela pode ser usada para arquivo, desde que manuseada direta- 
mente por linguagem de máquina. 

A operação, como vimos então, é muito simples. Se você 

ui algum programa que lhe permita ler um setor do disco, 
editá-lo e devolvélo ao disco, você pode fazer a alteração, 
lendo o setor O da trilha 17 — o VTOC. Lá você vai encontrar 
o mapa de conteúdo a partir do byte $38. Para livrar as tri- 
lhas 1 e 2 altere o valor dos bytes $3C, $3D, $40e $41, que 
a esta altura devem conter zeros, para o valor 255 (SFF). 

Se você não dispõe deste recurso, apresentamos aqui um 
programa específico que fará isso para você, com a vantagem 
de apresentar uma rotina em linguagem de máquina, a qual 
chamamos de NODRIVE (listagem 3), que irá residir no setor 
O da trilha O do seu disco. Assim, toda vez que o usuário, de- 
savisadamente, tentar instalar o DOS com o disco modificado, 
esta rotina será executada, desligando o drive, imprimindo a 
mensagem DOS FORA e indo para o BASIC. De qualquer for- 
ma, sugerimos que o leitor, após transformar um disco, rotu- 
le-o devidamente para evitar surpresas. 


DOS EXTRATOR 
O programa que acabamos de mencionar denomina-se DOS 


EXTRATOR (sugerindo que ele extrai o DOS) e foi desenvol- 
vido para o Apple II Plus com DOS 3.3 ou compatíveis, com 
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no mínimo 16Kb (listagem 1). Ele se utiliza, fundamental- 
mente, da sub-rotina RWTS (Read/Write Track/Sector) do 
DOS para ler o VTOC, alterá-lo e regravá-lo. Para isto, uma pe- 
uena rotina em linguagem de máquina é criada na página 
tos. que permite o acesso a RWTS. Vejamos a seguir a descri- 
ção detalhada do programa. 
1. Linhas 10-20: diagrama o vídeo e, através: da sub-rotina 410, 
ara os parâmetros iniciais. 
2. Linhas 30-90: interroga a posição do disco-alvo; se tiver um 
< RETURN > como resposta, entenderá slot % 6 drive & 1. 
3. Linhas 100-120: avisa o usuário para inserir o disco; depois 
disso, um < RETURN > fará o programa prosseguir (qual- 
quer outra tecla interromperá a execução). 
4. Linhas 130-140; seleciona slot e drive indicado. 
5. Linhas 150-160: via sub-rotina, lê o VTOC, faz as alterações 
e as devolve ao disco. 
6. Linhas 170-180: instala NODRIVE no setor 0, trilha O. Na 
realidade, apenas a linha 180 faz este trabalho — a linha 170 
foi colocada apenas por uma questão de requinte. Ela lê o 
setor 15, trilha 2 (que até então só deve conter zeros), zerando 
assim todo O buffer para receber NODRIVE. Deste modo, ao 
final da operação, o setor O da trilha O estará organizado, con- 
tendo apenas o programa, seguido de zeros. Nota: uma vez 
ue a linha 170 é apenas uma questão de capricho, o leitor po- 
de Dem cmg se preferir, por exemplo, acelerar a execução do 


5 "Linhas. 190-220: informa o fim da operação; a partir daí, 
um « RETURN > fará o programa recomeçar (qualquer ou- 
tra tecla encerrará). 

8. Linhas 230-260: duas sub-rotinas que chamam RWTS, via 
768 ($300), para ler e escrever no disco. 

9. Linhas 270-290: sub-rotina para ler o teclado. 

10. Linhas 300-370: verifica e informa se houve algum erro na 
leitura ou gravação; se houver, imprime mensagem de erro e 
interrompe o programa. 

11. Linhas 400-440: sub-rotina que inicia a execução. Primei- 
ro, pesquisando na a $030 endereço da Lista de Pará- 
metros para RWTS t/Output gpa Block — IOB), que 
para 48Kb está em 47080 (SB7E8). É claro que aqui nós po- 
deríamos ter construído nosso próprio IOB, mas optamos, no 
entanto, por utilizar o já residente. 

Uma vez encontrada a lista, linhas 410 e 420, os parâmetros 
são definidos na linha 430. Em seguida, a pequena sub-rotina 
para chamar RWTS é escrita na página $03, linha 440. 

12. Linha 500: dá o comprimento do programa, que é de 
1835 bytes; se o leitor preferir dispensar as declarações do tipo 
REM, o programa ficará com 1374 bytes. 


OUTRA ALTERNATIVA 


O leitor tem aínda uma outra opção para ganhar espaço no 
disco, e desta vez sem perder o DOS. Dissemos antes que o 
DOS ocupa as trilhas 0, 1 e 2; no entanto, da trilha 2 ele só 
ocupa os primeiros cinco setores. Os demais são vagos e nor- 
malmente só contêm zeros. Não obstante, o DOS reserva para 
si toda a trilha. Se livrarmos apenas estes 11 setores vagos, ga- 
nhamos 2816 bytes (2,75Kb), com a vantagem de não perder- 
mos o DOS. 

A operação é a mesma, ou seja, alterar o VTOC. Só que 
ra basta alterar o byte $40 para o valor 255 (SFF) e o Sat 
para o valor 224 (SEO), os quais referem-se apenas à trilha 2. 
DOS EXTRATOR pode fazer isso para você. Para isso, retire as 
linhas 170, 180 e 460 do programa original e altere as linhas 
160 e 190 conforme a listagem 2 e... bom proveito! 





Nelson Filho dedica-se re desenvolvimento e pesquisa de software bási- 
co, prestando serviços de assessoria técnica para várias empresas de In- 
formática. Possui um Apple 1! Plus há dois anos. 
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Listagem1 


REM cópia dar 


! 

2 mena vo 

3 memo EITRATOR ho 

. nm 1 

s RENS POR 1 

7 emo NELSON FILHO 1 

e rena 1983 + 

9 REM CRERERIRHIEIECANERIARHAREL 

10 TEXT; HOME : POKE - 16368,0 

20 INVERSE : PRINT TAB 15)*DOS EXTRATOR" SPC( 14); VTAB S: PRINT TAB( 16)"SELECIONE* 
SPCI 16): NORMAL : GOSUB 410 

J0 VTAB 3: CALL - 868: PRINT "SLOT NUMERO =)º; 

MO GET SLS:SL = VAL (SUS: TF (SL 1 ORSL 7) AND ASC (SL) 4) 13 THEN 40 


O IFSL=OTHENSL=6 

60 MIAB Bi: INVERSE : PRINT * SLOT 0º;SL: NORMAL 

TO VTAB 3: PRINT TAB( 26)"(= DRIVE MUMERO';: VTAB 3: NTAB 25 

00 GET DAS:DA = VAL (DR$D: IF (DRC 1 ORDR> 2) AND ASC GDRS) CD 13 THEN BO 

O IF DR=0 THENDR= 1 

100 CALL - 868: VTAB S: NTAB 16: INVERSE : PRINT SPC( 16)"DRIVE 0º;DR 

HO VIAB 3: HTAB 9: NORMAL : PRINT "INSIRA O DISCO E CRETURN)*;: GOSUB 280 

120 NTAD O: IF AC > 144 THEN PRINT * ABORTADO “a VTAB 23: END 

130 REM SELECIONADO SLOT/DRIVE 

140 POKE 108 + 1,SL 4 16: POKE TOB + 2,DR: PRINT * 

150 REM CORPO PRINCIPAL 

160 GOSUB 240: FOR 1 = 60 TO 64 STEP 4: POKE BUF + 1,255: POKE BUF + 1 + 1,255: NEXT 13 
GOSUB 260 

170 POKE TOB + 5,15: POKE 108 + 4,2: GOSUB 240: POKE 108 + 5,0 

180 FORT =1 TO 33 READ J: POKE BUF + 1,3: NEXT 1: POKE TOB + 4,0: GOSUB 260 


ALTERANDO “ 


190 VTAB 5: HTAB 17: INVERSE : PRINT "DOS FORA": NORMAL 
200 VTAB 3: TAB 11: PRINT "OUTRO DISCO CRETURND*; 
?10 GOSUB 280: IF À = 141 THEN RESTORE : VTAB 1: HTAB 1: GOTO 20 





240 POKE TOB + 12,1: rita GOSUB 310: RETURN 
zo REM GRAVANDO SE 

TOB + 12,2: Ci Se ad Eta 
O TECLADO 

€ = 16384); TF À € 128 THEN 280 
- 16368,0: RETURN 

VERIFICANDO ERRO 

PEEX CIOB + 13); IF ERR > 16 AND ERRO ) 32 AND ERRO ) 64 AND ERRC 
THEN 


sau 
“83 
Er 


“u 
É 
ga êsa 


= 198; VTAB 5: FLASH 


sscusus 
FPREP 


VIAB 23: END 
INICIALEZANDO 
PEEK (996) + PEEK (997) 8 256:LVT = PEEK (999) + PEEX (1000) 4 256 
PEEK (LV) + PEEK (NVT) 8 256: POKE 108 + 8,0: POKE 1OB + 9, 16:BUF = 4096 
108 + 3,0: POKE 108 + 4,17: POXE 108 + 5,0 

1=0 TOS: READ ds POKE 768 + 1,93 MEXT 15 RETURN 

DATA 32,227,3,76,217,3. 

DATA 166,43,189, 136, 192,32,147,254, 162, 10, 189,23,8,32,240,253,202,16,247,76,0,224,1 

93,210,207, 198, 160,211,207,196, 135, 141, 141 

REM PROGRAMA COM 1835 BYTES 





gases 
Et 


Listagem 2 


160 GOSUB 230: POKE RUF + 64,255: POKE BUF + 65,224; GOSUB 250 
190 VTAB 5: HTAB 15: INVERSE : PRINT "+ 2816 BYTES": NORMAL 


Listagem3 


1 eemeeeneeesas 
2 

3 & NODRIVE 8 
4 
S eeseeeseeasas 
+ 
7 
8 


9 BOOTSLOT EOU 825 Presente Slotti6 
TOROFF 


10 scose vDrive off 
14 CouTi EoU sFDFO vEscreve no video 
12 SETVID  EOU SFE9S ajusta saída para o vídeo 
13 BASIC EOU sE000 ivetor para o Basic 
18 
0801: AS 28 15 LDX BOOTSLT 4Desi ígando 
0803: BD 88 CO 16 LDA MOTOROFF,X 4 o Drive 
1 20 93 FE 17 JSR SETVID iModo video ) 
0807: AZ OA 18 LDX soa vEscreve t 
080B: BD 17 08 19 AVISO s0817,X 1 O texto 
080E: 20 FO FD 20 JSR CouTi | 
oii: CA a DEX 
08121 10 F7 22 BL AvISO I 
0814: 4C 00 EO 23 IMP BASIC 1Vat para o Basic 


ei7s C4 ma cr 
ao D: 








Com este programa, feito para micros da linha Sinclair, basta você ter 
os dados para fazer projeções de variáveis futuras. 








Ajuste os dados 
e faça previsões 


Armando Oscar Cavanha Filho 
Maria Beatriz de Campos Cavanha 


programa Ajuste foi desenvolvido para aplicações que 
necessitem obter à melhor relação entre duas variáveis 
quaisquer. Com ele pode-se ainda fazer previsões e 
projeções de valores futuros de variáveis dependentes em casos 
de séries temporais, desde que sempre se tenha em mente que 
o resultado será uma expectativa e, deste modo, deverá ser usa- 
do com cautela. 

A melhor relação entre as variáveis é obtida através da equa- 
ção de curva que mais se aproxime dos pontos dados. O pro- 
grama prevê seis opções para ajustar curvas a pontos dados, 
que são: (1) Linear, (2) Exponencial, (3) Logarítmica, (4) de 
Potência, (5) Hiperbólica e (6) Parabólica (veja a figura 1). 

Sempre que possível, procure competibilicar as ordens de 
grandeza das variáveis dependentes e independentes. Por exem- 
plo: se X varia de 10 a 100 e Y de 10.000 a 100.000, faça Y 
valer de 10 a 100, em milhares de Y. Isso permitirá uma me- 
lhor visualização gráfica e poupará trabalho para o micro. 


COMO FUNCIONA 





Para exemplificar o funcionamento do programa Ajuste, va- 
mos a um exemplo. Suponha que você seja um médico obste- 
tra que conheça os valores de Comprimento Cabeça-Nádega 
Fetal (CCNF) medidos em uma gestante em função do Tempo 
de Gestação (TG): 


TG (semanas)[6,5 eis o Lea 9,0 9,5] 10 [10,5 [11 [11,5] 
CCNP (mm) 8 1 ju [17 22 as [jm [m[42 [45/51] 


Digamos que, a partir destes dados, você queira saber qual o 
provável CCNF com 14 semanas de gestação (TG). O primeiro 
dado que você terá que fornecer ao programa é o número de 
pontos disponíveis, que no caso é 11. O programa lhe solici- 
tará, então, as coordenadas dos pontos. Lembre-se de que 
quanto maior for o número de pontos introduzidos maior será 











116 





(1) Linear 
Y= A+BX 


(2) Exponencial 


(6) Parabôlico 








(5) Hiperbôlico 


= 1/(A+BX) z 


Y= A+BX+CX 





Figura 1 
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E 1. "0. 


a representatividade da curva achada. O programa apresentado 
está dimensionado para SO pares de coordenadas, porém este 
número poderá ser aumentado mudando-se os comandos das 
linhas 170 e 180. 
Introduza, então, as coordenadas X e Y de cada ponto, da 
seguinte forma (observe que Y é o seu CCNFe Xo seu TG): 
X(1)= 65 
Y(1)=8 
X(2)=7 
“ 
% 


e 

Quando for introduzida a última coordenada (no caso, 
Y(11) = 51), o micro iniciará alguns cálculos e logo a seguir lhe 
solicitará o código de ajuste. 

Caso você tenha dúvida quanto ao tipo de ajuste a escolher, 
faça todos e depois opte pelo q fornecer melhor aproxi- 
mação, ou seja, aquele que tiver 2 mais próximo de 1. Mas 
não se esqueça que quando se tratar de projeções, você deverá 
escolher o ajuste que tiver a evolução que mais se identifique 
com o fenômeno real. Neste caso é imprescindível um bom co- 
nhecimento do problema em questão. 

Digitando 1 aparecerá no vídeo o ajuste linear, sua equação, 
seus parâmetros A e B e a proximação R? =0,9880. O micro 
lhe perguntará, então, se você quer outro ajuste com os mes- 
mos pontos, novos pontos ou interpolação. Para continuar 
com os mesmos pontos, digite O e vá pedindo, através dos có- 
digos correspondentes, os ajustes que você deseja. 

Após obter todos os valores de R?, você vai observar que o 
mais próximo de 1, no caso, é o parabólico, sendo portanto o 
melhor ajuste. 

Finalmente, para fazer a projeção, você digita 2 (interpola- 
ção) e, então, o micro lhe perguntará qual o TG para fornecer 
o CCNF correspondente. Digite 14 e ele lhe dará Y (o CCNF) 
=84,24. 


OUTRO EXEMPLO 
Agora vamos supor que uma empresa necessite saber qual a 


projeção de vendas de seu produto para o ano de 1984. Neste 
caso os dados seriam: 








Milhares 

de unida | 200 | 310 | 550 | 490 | 630 | 720 | 770 | 810 
des ven- 

didas 








e durante o processamento você conseguiria os seguintes da- 
dos: 














AJUSTE |. EQUAÇÃO R? | 
Linear | y= -6187 + 86X 0,9284 
Exponencial | y= 0,000288 x e?' 18X 0,8408 
Logarítmico | Y= -28923 + 6758LnX 0,9326 | 





| 
Potência EE Die x 474 0,8523 


Hiperbólico Y= 1/(0,037 - 0,00045x) 

















0,7158 
Parabólico | Y=-2348 + 69 X- 0,42 X2| 0,1428 





Com base nos resultados de R?, seria escolhido o ajuste lo- 
garítmico, e a resposta para a probabilidade de vendas em 
1984 seria de 1020 mil unidades de seu produto. 

» 
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PARA O SEU PROBLEMA, 
NOS TEMOS A SOLUÇAO! 


OUTRAS MARCAS. 
«TKB5e TK 83 
* JR. DA SYSDATA 
* APPLY 300 


* Aplicativos * Utilitários 
« Periféricos* Acessórios 
e Literatura Técnica 
* Jogos. 


SCHUMEC 


Profissional-Científico 
M 101/85 


2/88 
CPU 8088 (16 Bits) c/ 256 Kb 


de RAM 


Até 4 Diskettes de 8” 
Até 4 Discos Rígidos 
de 6 ou 12 Mb 
Sistema Multiusuário 
CURSOS: 
Basic Básico. Basic 
Avançado, CPM/DOS 
e Assembler. 


DIGITUS 
Pessoal e 
Semi-Profissional 
* Compatível c/ 0 TRS-80 
* Sistema Modular 
CPM 
* Alta Resolução de Vídeo 
PARA TODO O BRASIL 


KALHAU ENGENHARIA LTDA. 
Praça Tiradentes, 10 s/402 

Tel.: (021) 252-2752 — R.). 

Cep. 20.060 


DESPACHA 








* VISITA AO CASSINO 

* MIDWAY 

* PASSAGEM PARA 
O INFINITO ASILO 1 

* 10 JOGOS 
EXCITANTES 
PARA 1K 


DGT-100 Cr$ 240.000, x 3 — Grátis 18 jogos 
CP-200 Cr$ 110.000, x 2 — Grátis 6 jogos 
TK8S Cr$ 89925, x 2 — Grátis 6 jogos 
TKB2-C Cr$ 49.925, x 2 — Grátis 6 jogos 
ainda: UNITRON Ap Il, Mem 64K, 
Joystick, Impressoras, etc. 
(Preços sujeitos a modificações) 


PROGRAMAS PRONTOS EM FITAS 


JOGOS » JOGOS: | 
io SCARFMAN X 
PENETRATOR 
PER-NOVA 
Ma À VALKYRIA 


* JORNADA NAS 
ESTRELAS 
E MUITO MAIS! 


AVENTURAS 
DEFENSE COMMAND 
E MUITO MAIS! 


LEASING E CRÉDITO DIRETO! 


LITERATURA 


* MICRO-SISTEMAS 
* INTERFACE 

* JORNAL TK-CP 

* IMPORTADOS 


+ CURSOS DE BASIC 
GRATI 


NA COMPRA DE QUALQUER MICRO 


DESPACHAMOS PARA TODO O BRASIL! 


APLICATIVOS 
CONTROLE DE ESTOQUE 
CONTAS A PAGAR/RECEBER 
MALA DIRETAICADASTRO 
FOLHA DE PAGAMENTO 
VÍDEO-CLUBES 
ESTATÍSTICOS 
SOFTWARE SOB ENCOMENDA 


Rua da Lapa, 120 Gr. 505 
Rio de Janeiro - RJ 
Tel.: (021) 252-9057 





AJUSTE OS DADOS E FAÇA PREVISÕES 
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Ajuste cdi <CLNXCM>> w 
































“70 LET SXxLYL - SBxXELVYEL - <LENX<cM> > 
10 REM AJUSTE had <LNY<cM>> 
zo PRINT “ESTE PROGRAMA FAZ O AJ eso LET sxvr - sxvrrI - <a 4 Y<cmM>> 
USTE DE CURVAS A PONTOS DADO ”* xecmM> 
Bs" “evo LET svIz - svr12z - <a EA w<mM>> 
so PRINT - had z 
ao CLEAR 7oo NEXT mM 
so PRINT “IsLINEAR As 710 PRINT 
7z0 PRINT “INTRODUZA O Ne coDIcO 
“o PRINT “2sEXPONENCI AL “eAEXP< DO AJUSTE“ 
B*X>,A>0* 730 INPUT co 
7o PRINT “ISLOGARITMICO YeAs<B*LIM 7ao Fr co “- 1 THEM soro szo 
x 750 1” co wu z THEN coro 7,80 
so PRINT 4=“POTENCIA “en. 7.0 1” co wu > THEM coro 1080 
.A>0" 770 1r co - a THEM coro 1170 
ro PRINT 'S<HIPERBOLICO YWe1/<AsB 700 IF co - E THEM coro 1270 
mx,” ? soo rr co - “ THEM coro 1470 
100 PRINT “6=PARABOLICO YeAsB=xX+o sio srTror 
crexe=z sz0 LET A — «sw had sx2z — sx “ sxw 
120 PRINT > 4 <m had sxz -— <Bx> had he z> 
130 PRINT “INTRODUZA O NUMERO DE s3s0 LET B - <m - sxvw — sx - svY> 
PONTOS nN* «mn - sxz - <sx> led had z> 
140 INPUT MM sso LET R2Z - <a had sw - B “ sxvw —- 
150 PRINT <<csv> had hd z> 4 n> 4 <«Bsvz -— 
1580 PRINT “INTRODUZA AS COORDENA <«<csvw> - - z2> Pá M> 
DAS pda td E mic 2 irc tara DOS ronTos eso cLS 
DISPONIVEIS.NESTA ORDEM E Ss seo PRINT AT 3,7; “AJUSTE LINEAR 
PARADAS POR ENTER (NEW LINE» . 
170 DIM X<S5S0> s70 PRINT AT 4.7; “o 
180 DIM v«<cso»> sso PRINT Ar Ss. 74 
190 FOR M = 1 To n svo PRINT Ar 6.7 
zoo INPUT xe<cm> 00 PRINT Ar P.7ICRZ" ;RZ 
z10o INPUT vwecm> 10 PRINT Ar 13, 0;“PARA OUTRO A 
zzo0 1” xc<cm> < - o OR vcmM> < - JUSTE com os mesmos PONTOS D 
o THEN coro zso IGITE o; PARA USAR novos Prom 
z30 NEXT mM TOS DIGITE 4 PARA INTERPOLA 
zao coro zv0 R DIGITE z" 
zs0 cLS zo INPUT MO 
zeo PRINT 30 cLs 
270 PRINT “FOI INTRODUZIDO x ou vao 1” mo - o THEN coro 7z0 
* <«0 USE TRANSLACAO YeY+K E 250 IF MO = 1 THEN GOTO 40 
10uU X-X+K, RETORNANDO A EQUAC vo IF MO - z THEM coro 1700 
Ao FINAL ACHADA * 70 coro zo 
280 coro 160 280 LET AL - cSYL * sx2 —- gx = 8 
zv0 LET sx - o XYL> 4 <m hd sxz — <sx> “ had 
300 LET sy - o z> 
310 LET SxL - o 90 LET B - <n had SxvYL — sx had BvYL 
a3z0 LET SYL ve o id 4 «nm - sxz — <sx> “ ” z> 
330 LET sx2z - o 10 o LET R2Z - <aAL - SYL - B “ sx 
340 LET sY2z a o YL — <sSYL ed SYL> 4 mM> EA <SYL 
350 LET SXxL2Z - o z — <svYL - SYL> EA mM> 
3.0 LET SYLZ - o 1010 LET A - ExP AL 
270 LET svYI - o 10z0 cLs 
300 LET sx3 - o 1030 PRINT Ar 3.7; "AJUSTE ExPON 
390 LET svY3 - o ENCIAL* 
aco LET sxa - o 1040 PRINT AT 4.,7;0"YWeAEXP <B=x 
a10 LET sva -- o pra 
azo LET sxy - o 1050 PRINT AT Ss,7 a 
a30 LET sxzw - o 1040 PRINT AT 6,7 e 
asaao LET SxvYL - o 1070 coro voo 
aso LET sxLY - o 1080 LET A = <svw had BxL2Z BxL had 
a.o LET SXLYL - o SBxLY> 4 <«m had BxLZ —- SxL had sx 
ao LET gsxvr -— o L> 
aso LET svYIZ - o 10vo LET B - <«m bed BxLY - BxL = s 
avo FOR M = 4 TO n W> 4 <m had BxL2z -— SxL had BSxL> 
soo LET sx - sx - x<m> 11 o LET RZ - <A Lad sv - B “ BxLY 
s1o LET sYv - sw + w<cm> — <«<csvY> - - z> EA mM> 4 <«svrz 
szo LET SXxL - SxL - LNX<M> - <csv> - - z> 4 M> 
s3a0 LET SYL = SvYL - LNY<cmM> 1110 cLs 
sao LET SX3 - BX2 + c<xem>> = e! 1120 PRINT AT 3.7;“"AJUSTE LOGAR 
« ITMICO" 
sso LET sv2 - svz - <«vwem> > “ “ 1130 PRINT ar a." 
z 1140 PRINT “Sr Ps” 
sso LET SxLZ - BxLZ - <LNXcM>> - 1150 PRINT AT 6,.753º 
<LNXcM>> 116460 coro oo 
s70 LET svYLZ — BsYLZz - <LNYeM>> - 1170 LET AL pa <«svYL - SsxLZ - BxL - 
<LNvYeM> > BXLYLE> É <m “ BxL2z — BxL “ s 
seo LET SYI = SYI +14 wem> XE > 
seo LET 3x3 - sx3 - <xecm>> “ - 1190 LET mB - <m - SXLYL - SxL - 
a SYL> 4 <m had SsxLz -— BxL “ SxL 
“oo LET SY3 = BY3 + cwecm>> w ” > 
> 1190 LET RZ - <aAL hou svYL - Bs ho sx 
“10 LET sxa - xa - <xem> > “ od LYL —- <«BsvYL - SYL> Fá > L «sv 
a Lz — <BvYL bed BYL> EA m> 
“20 LET sva - svwa - <vem> > - had 1200 LET A - Exr AL 
a 1210 cLsS 
“30 LET sxYv - sxvw - <xecm> > - v<m 1220 PRINT Ar D.7I;CA POTEN 
> CIA” 
eso LET sx2z2Yw - sx2w - <<xecm> > - 1230 PRINT Ar 4.75 Y “=. 
had z> ” Ww<cm> 1240 PRINT AT 5,7; Eos 
eso LET SxXxYL - SxvYL - <LNYeM> > “ 1250 PRINT A” Co PI B 
x<m> 








PROCURE QUEM POR QUE NÃO TUDO EM 
GA, NENMNTE Esrenor. UM SÓ LUGAR? 


Z MICROMAQ 


+ H nm É " q « " >, ICacoe 
R. Sete de Setembro, 92 - Lj. 106 [NM Microcomputadores, Sotware, Publicações 
Tel.: 222-6088 - Rio de Janeiro [DOM] SUE [MATE OUTER ET Ca Tot TS quipamentos. 
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TIG-LOADER possibilita 
a a localização do ótimo volume do gravador 
facilitando a operação L D 
1270 LET A = <SvYI = 8x2 —- 8x = 8 fschados” 
* = * * c 
Edo ha É bdcsêsido DE carregar (LOAD) e DUPLICAR simultanea 
1200 LET DD - €N “e. SxvI - 8x * sx PROBLEMAS mente. a 
> 4 CN“ Bx2 - cx» = ”* 2> gravar (SAVE) em 2 gravadores ao mesmo 
Use Tig Loader O tempo. 
1290 LET na e cão VI e Di“ BEY monitorar as operações LOAD, SAVE ou 
T = tease o. RES Es DUPLICAÇÃO através de fone 
é Ê = à O através de fone 
ad ves <cecBvi> z> N> filtrar as interferências elétricas de baixa 
=tbrçã4 O RINE AT SD. PI: “AJUSTE KIPER requência, que são a causa da maioria 
BOLICO" APENAS: CR$ 15.000,00 »s problemas de LOAD/SAVE 
1320 PRINT Ar APLICA IL CArD= > 
192320 PRINT AT 5, AA APLICATIVOS PARA TK E CP 200 
1340 PRINT AT 6, DB=":;B 
boto -dps soro 100 TIG-SCREEN: vir sete 1 E à incrementar seus programas! 
1470 LET D = Now 2 “ axa - «gs inver Tr . s, rotação, scroll 
x2> “ss “ <sx = sxa nversão ns, rotação, scroll em quatro 
- sx3 » 8x2> ax2 « ecemx w direções q sais incriv inguagem de máquina 
sx> -—- csxz> * ” 2> 1,3Kb, ficando protegido no RAMTOP, depois é só utilizá-lo onde qui 
1490 LET DA = BY “ <sxz = xa — P/ 16K Com manual explicativo Cr$ 8.000,00 
<Bx3> had had z> -— sxvY hd <Bsx “ 
ao fado - imp rça - indo did - <«s TIG-COMP: coloque, em seus programas em BASIC, a velocidade de 
- CORRS a - > k Ar 
código de quina. Rode form 2 P| Simples de usar 
1490 LET DB o N* csxr = sxa - s dig áq d 3 à COMPILADA E 4 , 
EV “ HS) - EX * CY “ sx - é só carreg ju digitar seu programa em BASIC e depois usar 
BXx2v « BX2> + SX2 * cs = sx 2 TIG-COMP Você terá o seu programa em linguagem de máquina em 
3 — sxvY - sxz> 
1500 LET DC = N = <BxXxZ = sx2vY — manual explicativo Cr$ 15.000,00 
sx3 bed sxY> -— sx ho <sx had sxzw 
- BXD * BY> + BXZ * cmx = 5 TIG-SPEED: um ação de soft e hardware, permitindo uma transferênci 
xY— Sx2 2 8x) fes dead Di polia o ld 
vSzo Pera DR de dados micro/cassete de 4.200 bauds. Você poderá carregar ou gravar 
1520 LET B = DB 4 D 16 Kb em 30 jos enta ao micro a função VERIFY. Facilimo de 
1530 LET C - DC EA D Xperar, compõe e, interface e manual explicativo. 
1s4o LET YM «- SY 4 MN P/16e Preço sob consulta. 
1550 LET vv = o 
1560 LET VYE - o 
1570 FOR M wu 1 To ns 
1580 LET vv - vw - <«vw<cmM> — wM> had 
<«vw<cm> — <mM> 
1570 LET vYE - vvYE - <<a + Bs had x S| t jas nos preç 
MM) o E w cREM) = cxcmI5> = Atendemos somente por carta 
wmM> - < <a - Bs had x<m> - c bed — 
XeM>> = cxXcM>D>> — wUM> Es ê 
1600 NEXT M TIGRE COM. DE EQUIP. P/ COMPUTADORES LTDA 
1610 LET RZ = SaR (<VYE 4 vYw> Rua Correia Galvão, 224 
1620 CLS CEP 01547 - São Paulo - SP 
164630 PRINT AT 3.7: "AJUSTE PARAB 
oLIcO*“ 
16440 PRINT AT 4A,7PLICAAr<LBDAK+ CA 
Epi 
1650 PRINT AT 5.75 
1660 PRINT AT 6,75 
1670 PRINT Ar 7.7i 
1680 coro voo 
1700 CLS 
1710 LET XMAX -= x<1> 
1720 LET YMAX - w<1> 
1730 LET XxMIN = x<1> 
1740 LET YMIN = w<1> 
1750 FOR M «- 1 TON 
1760 LP XMAX < X<M> THEN LET XxM 
AX = XcM> 
1780 1r “MAX < vw<mM> THEN LET vm 
AX - Y<mM> 
= pv gÃ E GADO EXRS TMEM LET um COMÉRCIO E SERVIÇOS LTDA. 
IN = xc<cmM> 
1795 LE YZMIN > YCM> THEN LET Ym 
Im Y<M> 
1800 NEXT M 
1810 PRINT Ar D.7ICAMAX = 
1920 PRINT Ar APLINUAMAX = 
1030 PRINT Ar Ss.7:"EMIN= Su . . “ 
1840 PRINT AT 6:74" MEIN primentos para escritório e processamento de 
1850 PRINT Ar 8,0; INTRODUZA O 
VALOR DE “ext O MICRO CAL dados 
CULARA “or <x>* 
1960 INPUT 1x 
1870 IF CO « 1 THEN GOTO 1950 Pra A E 4 E 
1990 IF CO « 2 THEN GOTO 1980 Comercialização e assistência técnica a Micro 
1890 IF CO «= 3 THEN soro zo10 a a % 
1900 IF CO « 4 THEN GOTO 2040 Computadores e equipamentos de escritório 
1910 IF CO = 5 THEN GOTO 2070 
19230 IF CO « 6 THEN GOTO 2130 em geral 
17940 sTOoOP 
1750 LET Y - a E B “ 1x 
1970 coro 2140 . 
LS6O LET Yu A EXPCcBÕR IX Revendedor autorizado: 
2000 GOTO 2140 
zoi1o LET Yw - A + B had LNIx HP | M s p 
zozo coro z140 
zoao LET YA. Ex “ B «IB “e HAR 
zoso coro z140 
2070 LET Y 14 <A + Bmw Ix> 
2090 GOTO 2140 PROLOGICA 
2190 LE. - A + BD hd rx - c had Ix 
* “2 
z140 PRINT Ar Bean Ta De 2 JS ES 
Xe"; LX 5 
2150 coro v10 s São Paulo: 
Rua Dr. Fernandes Coelho, 64 
1] Th r o Fone: (011) 211.9202 / 814.5500 
: oia ). 
Armando Oscar Cavanha Filho é Engenheiro Mecánico formado pela ho) Telex: (011) 35.763 
Universidade Federal do Paraná e Maria Beatriz de Campos Cavanha é 
Médica formada pela Faculdade Evangélica de Medicina do Paraná. 
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Nesta partida de futebol você será o técnico, o atleta, o torcedor e o 
árbitro... você só não poderá hostilizar o juiz!!! 





Futebol ao som do micro 


este divertido jogo de futebol, 
para os equipamentos compatí- 
veis com o TR$-80 Modelos I e 


HI, você é o técnico que escala o time e 
determina os tempos do jogo. Depois é 
o atleta, mostrando toda a sua habilida- 
de em campo e, a cada gol, você é o in- 
flamado torcedor, em plena arquiban- 
cada do estádio, animado pelo som do 
micro. Os tumos se sucedem automati- 
camente e, ao fim, a tela será o placar 
eletrônico mostrando o escore final da 
partida. 

Através da sub-rotina 6000 o progra- 
ma utiliza um recurso de sonorização, 
isto é, a cada gol, esta sub-rotina aciona 
durante alguns segundos o gravador para 
a entrada de uma mensagem sonora. Esta 
mensagem deve ser gravada em cassete 
anteriormente e ter a duração do interva- 
lo (de segundos) que você fixar na sub- 
rotina 6000. 

Uma sugestão para gravação de men- 
sagem é você aproveitar a transmissão 
de uma partida de futebol pelo rádio e 
gravar o grito de gol do speaker com 
aquele tradicional barulho da torcida. 


Antonio Macchi Jr. é formado em Adminis- 
tração de Empresas pela Universidade Federal 
do Rio Grande do Sul. Desde 1980 utiliza um 
TRS-80, desenvolvendo programas aplicativos 
e jogos. 
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Antonio Macchi Júnior 


Futebol Automático | 


| O CLS:IPRINTEOZOS, "e AAA A A a a À 


É “PRINTEZ7O, "é FUTEBOL AUTOMATICO - COM SOM 
2 * PRINTE334, “4 
|3 “ PRINTE39O, Me Por A. Macchi Jr. & Macchi III 
4 “ PRINTOM62, ne SALVADOR - Ea - BRASIL - ABR/81 
s “ PRINTES2S, “4 TELEFONE: (071) 24581387 
6 ê PRINTES9O, "e de de e DM A A E 
Ed 


7 CLEAR 200 
10 PRINTE723,"":: INPUT"NOME DC TIME NUMERO 1": J$:PRI 
| NTG787."";: INPUT"NOME DO TIME NUMERO 2":G$ 

15 CLS p 
30 PRINTEZO,CHR$(157)3" = "Ig" x "Gg" = "sCHR 
+ (USO APRE 0 812 INPUT QUANTOS JOGADORES EM CADA | 

“SK 

SO CLS:PRINTES32. STRING$ (42, 140): PRINTES96. "FITA NO 
GRAVADOR - PRESSIGNE <rlaz> - DESLIGUE SAIDA <EAR>" 
60 PRINTE404,"";: INFUT"QUANTOS TURNOS DESEJA "sTZ 

70 Ti=0 
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250 
260 
270 
280 
300 
310 
320 
29) 

330 
400 


1035 
1040 
1045 
1046 
1050 
1065 
1070 
1100 
1110 
1120 
1130 
1140 
2100 
2200 

210 
2250 


“sPs:G 


260 
“ÉsR 
2270 
2280 
2290 
2295 
2300 
2310 
2990 
3000 
3100 
3300 
3400 
4000 
6000 
4010 
6020 
6030 
6100 
6110 
JO 
6120 
x 
PR 





T: 





6130 





FORI=1 
NEXTI 
FORI=0TOS4 


PRINTE?7 
R$(157): 


"TURNO 
D+ "JOGO EM "3 
+LTHENGITO4100 


PISTAS 
" TURNOS"; 





FORI=14T0101 
SET(I.7) 
NEXTI 

FORI=7T 





SET(I.40) 








T(14,1 ET(IS. Ds: 
IFI=S0THENZSO 


SET(100,I):SET(10O1,1) 





NEXTI 
FORI= 


277040 


[6] 






GOTO: 





o 
ta 
O 


SET(7+1> 





:SET(7+1, 29): SET (102+1, 18): SET (102+1, 


NEXTI 


"5645" "s5P;:PRINTE99.CH 







FO 
FORN=1T 
Q$=CHR$ 
IFT=2THENQSE=CHRS (157) 
PRINTE44+(RND(10)+2) +2+RND (37) +8, 0$3 
NEXTN:NEXTT 

PRINTES CHR$(183):€5583, 





CHR$(157)3 






IFPOINTC(X.Y) 
RESET(X.Y) 
X=X+A 
Y=Y+E 
IFX>100THENP=P+1:FRINTE77.CHR$(1S3)3" 
UB400C:GOTO1100 
IFX<1STHENR=R+1:PRINTE997.CHR$(157)5" 
3: GOSUB4000:60T01100 
I$=INKEY$: IFI$="1"THEN1100 
C=C+1 
IFC>SOOTHEN100 
PRINTe72S."TEMPO 
IFPOINT(X,Y)=-1 THEN3000 
SET(X.Y) 
GoT0OZi00 
IFPOINT(X» 
A=-A 
B=-B 
GOTO2Z200 
END 
QUTZ25S, 4 
FORW=1T 
OUT2S5S. O 
RETURN 
CLS 
PRINT:FRINT:FRINTTAB(ISS)"R E S 
G O": PRINT:PRINT:PRINT: 
PRINT:PRINTTAB(1S)CHR$(1S3)3" “56$3" ad | 
“Rs! dt 0 É de "sCHR$(157)35:PRINT:PRINT:PRIN 
INT:PRINT:FRINTTAB(1S)"RALIZADO EM "T1-15" TURN 


=-1 THEN1100 


vsg$s" 





“age " 





“"3500-C3 


Y-B) =2THENB=-B:G0T02200 


PNEXTW 


03c0e 


NEvADO DO 





END 


se 
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TRS-80 MOD Il / MICROS C/ CP/M 
SOFTWARE D DISPONIVEL: 


) TRS-80 MOD. ll 
- Compiladores (TRS DOS/CP/M) 
- Sistemas Operacionais 
- Utilitários 
- Aplicativos Standard Rad Shack 
) TRS-80 MOD. Il/MICROS C/ CP/M 
- Contabilidade 
- Folha de Pagamento 
- Controle de Estoque 
- Controle de Boutique 
- Mala Direta 
- Mercado Financeiro 
- Administração Financeira 
2. 8 -Contas a Pagar/Receber 
2.9 - Administração Imobiliária 
2.10 - Condomínio 
2.11 - Estatística de Vendas 


2.12 - Visicalc 


2.13 - Banco de Dados 


COMERCIALIZAMOS: 


Programas Objeto/Fontes 
Implantações/Manuais 


PROJEDATA / READY 


Rua Barão de Mesquita n.º 712-A 
Andaraí — Cep. 20.540 Rio de Janeiro 
Fones: 258-7599 e 273-8387 

Solicite a visita de nossos Representantes 
Tecnicos 








SOFTWARE PARA 
GRAVAÇÃO E 
LEITURA DE 
DADOS EM FITA 
TOS-3R 

CoM O TOS-3R VOCÊ PODERA 
GERAR SEUS CADASTROS EM 
FITA, SEM LIMITE DE MEMÓRIA. 
COM O TOS-3R VOCÊ TAMBÉM 
VAI LER E GRAVAR SEUS PRO- 
GRAMAS 14 VEZES MAIS RÁPIDO 
QUE O NORMAL, POR APENAS 
3 ORTN'S. 
| Par alterações no HARDWARE 
F 








artamente documentado 
Jogos — 2 ORTN's Aplicativos - 3 ORTN'S 
— Otelo — Controle de 
— Impérios Espaciais estoques 


— Forca e Velha — Rotinas de 
— E muitos outros controle de vídeo 
Solicite catálogo grátis 


Pedidos em cheque nominal cruzedo 


3 = CONSULTORIA E 


INFORMATICA LTDA | 
Fone 











Rua Pariquis, 3333/601 
Belém-Pa. - CEP: 66.000 
(001) 2722-8846 





| 











| 








ANO HI 


Há 2 anos contribuindo com 
a informática brasileira! 


Leia e assine: 


sis 


A PRIMEIRA REVISTA BRASILEIRA DE MICROCOMPUTADORES 


Publicação da ATI Editora 
que agora lhe oferece também 


FERE TEVE 
== Informática & 
HE Administração 
FERA Tv REALISMO 


( Se você não quiser cortar sua revista, tire uma xerox do cupom abaixo) 


nome 


empresa 


profissão 


filiada ao 





Junte a estes dados cheque nominal à; 
ATI Editora Ltda. 
Al. Gabriel Monteiro da Silva, 1229 
São Paulo — SP — CEP 01441 
Rua Visconde Silva, 25 

s Rio de Janeiro — RJ — CEP 22281 
(seu recibo será enviado pelo correio) 


A Magnex 
apresenta em 
1º exibição 







DE MFORIMNATILA 
o microcomputador 
que você pode 
ver por dentro. 








Você sabia que o microprocessador Z80 executa mais instruções 
do que as descritas em seu manual? 





As instruções secretas do Z80 


Jorge Mendes 


s instruções dos microprocessadores de 8 bits são for- 
madas em geral por 1 byte (8 bits), onde são indica- 
dos a operação e o(s) registro(s) envolvido(s), seguido 
em alguns casos por 1 ou 2 bytes contendo endereço ou dados. 
Desta maneira, são possíveis 256 instruções. 

O microprocessador 8080A tem 244 instruções, enquanto o 
Z80 foi projetado para ter estas 244 instruções (para que um 
programa feito para o 8080A funcione no Z80) e mais algumas 
instruções, sendo que parte delas resulta do número maior de 
registros internos no Z80 do que no 80804. 

A solução encontrada para se conseguir mais que 256 ins- 
truções no Z80 foi reservar 4 instruções (veja a figura 1) das 
possíveis 256 para indicar que o próximo byte deve ser inter- 
pretado como instrução ao invés de endereço ou dados. Deste 
modo, seriam possíveis mais 1024 instruções, mas apenas 442 
delas são divulgadas pelo fabricante (ED63H equivalente a 22H 
e ED6BH equipvalente a 2AH não estão incluídas neste total). 




















Estas somadas às instruções de 1 byte, perfazem o total de 694 
instruções. 

per INSTRUÇÃO 3 OFICIAL DE | “Ea 
cBH op. lógicas e com bits 248 8 

DDH op. com o registro IX 70 218 

EDH op. diversas(E/S, bloco,etc.) 54 - 

POH op. com o registro IY 7 2"s 

TOTAL [2 | 438 
Figura 1 


A seguir serão descritas 438 instruções não divulgadas pelo 
fabricante do Z80. 
1. Shift Left Invertido 

Podemos observar que existem os códigos de instrução de 
CBO0H a CB2FH e de CB38H a CBFFH. A execução dos códi- 
gos de CB30H a CB37H faz com que o conteúdo do correspon- 
dente registro de 8 bits seja deslocado de 1 bit para a esquerda, 
o conteúdo do bit 7 vá para o Flag Carry e o bit O assuma o 
estado lógico 1 (veja a figura 2). Podemos chamar esta instru- 
ção de SLI (Shift Left Inverted); veja a figura 3. 


65 43210 





Figura 2 
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CÓDIGO | INSTRUÇÃO 





Figura 3 


Em termos aritméticos, esta instrução multiplica o valor do 
registro por dois e soma uma unidade: 


registros 1 + 2 + 


2. Instruções com os registros IX e IY 

Observando as instruções que envolvem o registro IX (IY), 
venificaremos que elas são as instruções que lidam com HL, 
precedidas pelo byte DDH (FDH). Este byte aciona o registro 
IX (IY) no lugar de HL para a execução da instrução seguinte. 

Em outras palavras, colocando-se o byte DDH precedendo 
uma instrução que envolve HL (exceto EX DE, HL e EXX, 
além das instruções iniciadas pelo byte EDH), estaremos subs- 
tituindo HL por LX e (HL) por (IX+dd): 


registro 


09H : ADD MHL,BC 
DDO9H ADD IX,BC 
7EH LD As(HL) 
FD7EddH : LD A,s(Iy+dd) 
CB86H RES O,(HL) 
DDCBdd86H RES G,(IX+dd) 
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Deste modo, conseguimos as seguintes instruções, que não 


são divulgadas pelo fabricante: 
a) Shift Left Invertido: 
cB36H Cais (HL) 
DDCBdd36H : SLI (Ix+dd) 
b) Instruções com os registros IX e IY': 


Colocando o byte DDH (FDH) precedendo as instruções 
que começam pelo byte CBH (exceto BIT) e que não envolvem 
HL, teremos o seguinte resultado: 


cBsoH RES 0,B 
FDCBdd80H : RES G,(IvY+dd) e 
LD B,(IY+dd) 


(FDCBddBOH = FDCBdd86H + FD46ddH) 


Observe que o bit O da posição IY+dd da memória foi para 

o estado lógico O e, logo em seguida, o conteúdo desta posição 

da memória foi transferido para o registro B. Esta instrução é 

equivalente a duas ração vs oficialmente divulgadas no ma- 
igura 4). 


nual do fabricante (veja a 





Figura 4 — Operações com (1X+dd) ou com (1Y+dd) com transferência 
do resultado para um registro da UCP: código DDCBddxyH ou 
FDCBddxyH. 


3.IXe IY divididos em registros de 8 bits 

Se estendermos o procedimento descrito no item 2 para H e 
L separadamente, teremos instruções envolvendo apenas meta- 
de (8 bits) dos registros IX e IY. Em outras palavras, colocan- 
do-se o byte DDH precedendo uma e ne envolva H 
ou L, mas não envolvendo HL, como LD H(HL), estaremos 
efetuando operações com o byte superior ou o byte inferior 
de IX. Chamaremos, respectivamente, de MSB de IX de HX e 
LSB de IX de LX; analogamente, teremos HY e LY. Exemplo 
(veja também a figura 5): 


24H INC MH 
DD24H : INC HX 
ASH : AND L 
FDASH : AND LY 
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INSTRUÇÃO | CÓDIGO (HEX) 





DD24 
DD25 
DD26nn 
DD2C 
DD2D 
DD2Enn 
DD44 
DD45 
DD4C 
DD4D 
DD54 
DDSS 
DDSC 
DDSD 
DD60 
DD61 
DD62 
DD63 
DD64 
DD6S 
DD67 
DD68 
DD69 











Figura 5 — Observe que trocando-se DD por FD obtém-se as instruções 
equivalentes para IY. 


Note que isso não se aplica às instruções começadas pelos 
bytes CBH e EDH. 


CONCLUSÃO 


Com isto, um total de 438 novas instruções estão disponí- 
veis para utilização. 

Mas como os Assemblers existentes só reconhecem as ins- 
truções oficialmente descritas em seus manuais, teremos que 
utilizar DEFB (definição de byte) ou DEFW (definição de pa- 
lavra, 2 bytes) para introduzir as novas instruções no programa. 

As instruções com HX, LX, HY e LY podem ser introduzi- 
das no programa conforme os exemplos a seguir: 


INC HX DEFB DDH 
INC H 

LD LY,10 : DEFB FDH 
LD 2,10 


A não divulgação oficial destas instruções pelo fabricante 
provavelmente se deve ao fato de que a descrição de um con- 
junto excessivamente grande de instruções poderia dificultar a 
fabricação de novos produtos compatíveis com o Z80. 

Evidentemente estas instruções não divulgadas não serão tão 
utilizadas como as instruções oficiais. Por exemplo, HX, LX, 
HY e LY só serão usadas em programas que necessitem de mui- 
tos registros de 8 bits para operações lógicas ou matemáticas, 
mas que não necessitem de IX e IY para endereçamento. 

As instruções descritas foram testadas em microprocessa- 
dores Z80 fabricados pela ZILOG, MOSTEK e NEC. = 

e 





Jorge Mendes é Engenheiro Eletrônico formado pelo ITA. Trabalha 
atualmente na Nuclebrás Engenharia S. A. 
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Coloque o display de cabeça para 
baixo. Faça o disquete tocar uma 
música de Roberto Carlos para 
avisar que o programa já está 


para as linguagens BASIC, 
COBOL, Pascal e FORTH. 
Não é preciso chegar a extremos, 
mas se você tem pequenas rotinas 
e programas utilitários realmente 
úteis tomando poeira em seus 
disquetes ou fitas cassetes, 
antecipe-se aos piratas e trate 
de divulgá-los. Envie-os hoje 


mesmo para 
REDA ÇÃO. DA MICRO 
SISTEMAS — SEÇÃO DICAS 
Rua Visconde Silva, 25 
BOTAFOGO — RIÔ DE 
JANEIRO — RJ 

CEP 22281 

Desta forma sua descoberta 
poderá ser útil para muitos e 
muitos, ao invés de 
desmagnetizar-se com o tempo em 
suas fitas e disquetes... 


ZX-TK-CP-200 
SCROLL em Assembler 


Com estes quatro SCROLLs você poderá “rolar” a 
tela para cima, para baixo, para a esquerda e direita, ra- 
pidamente. Eles foram colocados no início da RAM, mas 
podem ser gravados em qualquer outro lugar, desde que 
se calculem os novos endereços. Para começar, digite: 


1 REM 11111111111111111111111 
11111111111111111111111111111111 
1111111111111111111111111111111% 
111 

Atenção: são 90 caracteres. 

Entre com os dados do bloco, usando para tal o Moni- 
tor Assembler publicado na MICRO SISTEMAS nº 23 
(página 10). Faça uma cópia em fita cassete e teste o 
programa com RAND USR: 


RAND USR 16514 — SCROLL para cima 
RAND USR 16529 — SCROLL para baixo 
RAND USR 16553 — SCROLL para a direita 
RAND USR 16578 — SCROLL para a esquerda 


Agilize os laços FOR-NEXT 


A forma clássica ESTO nos manuais para o fe- 


chamento dos laços FOR-NEXT alinhados é: 
10 FORI=1 TO 10: FORJ=1 TO10:FORK=1 TO 10 
20 NEXTK : NEXTJ :NEXTI 

Como alternativa, também costumam oferecer: 
20 NEXTK,J,I 

O maior inconveniente, em qualquer um dos casos, é 
a preocupação que devemos ter em fornecer as variáveis 
na sequência correta. Mas, usando-se: 
20 NEXT : NEXT : NEXT 
além de eliminar a poa ção com a sequência, ganha- 
se em tempo de execução! Para comprovar, basta aumen- 
tar cada um dos laços para, digamos, SO repetições e 
cronometrar cada uma das alternativas. 


Roberto Quito de Sant'Anna — RJ 





CP-500- DGT-100 
Substitua o IF-THEN 


Vamos supor o seguinte problema: 
e Se A é menor ou igual a 100, B é igual a O; 
e Se A está compreendido entre 101 e 200, B é igual 


al; 
e Se A está compreendido entre 201 e 300, B é igual 


no 
e Se A é maior que 300, B é igual a 3. 

Este problema pode ser facilmente resolvido através 
da combinação de algumas instruções IF THEN, usando- 
se algumas linhas de programa. Podemos, entretanto, re- 
solvé-lo em uma única linha e, o que é mais interessante, 
sem usar um único IF THEN: 


B=-(A >=101) *—((A >=101) + (A>=201) + 
(A>=301) 


Parece estranho, mas não é: toda expressão relacional 
ou lógica (usando = ,>,<,>=,< =,<> É 
NOT) retorna ao programa o valor O se é falsa;e a —1 se 
é verdadeira. O segredo consiste em colocar todas as 
condições possíveis entre parênteses e, com al, ima- 
ginação, combinar os resultados por meio de adições 
e/ou multiplicações, obtendo assim o efeito desejado. 

Neste exemplo que apresentamos, se A= 257, os re- 
sultadosserão:(A | =101)= —1,(A >=201)= -1,.. 


(A > EO =0 e, em consequência, B =-(-1) * 


—(=1-1+0) = 2, conforme o desejado. 


Roberto Quito de Sant'Anna — RJ 


Paginando o vídeo 


Para imprimir, na listagem de um relatório ou arqui- 
vo, somente um determinado número de linhas por pá- 
gina de vídeo (15, no máximo), e passar para a próxima 

“página” somente quando desejar, use este método: 
10 FOR N= 1 TO 100 


A,B,C 


500 INPUT “APERTE < ENTER > PARA NOVA PA- 
GINA” :X 
510 CLS: RETURN 

A linha 80 realiza o desvio para a sub-rotina a cada 
múltiplo de 14 (neste exemplo); e a linha 100 evita um 
RETURN sem GOSUB ao final do laço. 


Roberto Quito de Sant'Anna — RJ 


CP-500- DGT-100 


Posicione o PRINT e 


Em vez de fazer cálculos ou consultar o lay-out do 
vídeo para usar a função PRINT & |, determine a posi- 
ção da função PRINT Q& da forma mais simples, refe- 
a apenas a linha L (de 1 a 15) e a coluna C (de 
1a 63): 

10 AT= 64*(L-1)+C 
20 PRINT O AT, 

Se você dispõe de BASIC DISCO, é ainda mais fácil: 

1 DEFFNAT(L,C)= 64 *L-1)+C 


100 PRINT € FNAT(X,Y), 

É preciso apenas ter cuidado com a última linha, por 
causa do “rolamento” da tela (SCROLL), e com as úl- 
timas posições em cada linha, por causa da alimentação 
automática (LINE FEED). Uma observação importante: 
esta função que apresentamos conta linhas e colunas a 


partir de um. 
Roberto Quito de Sant'Anna — RJ 


ZX-TK-CP-200 
Padronização monetária 


Padronize a apresentação de valores monetários com 
essa sub-rotina que deve ser usada da seguinte forma: o 
valor deve ser colocado na variável A, e retornará como 
string na variável A$. Por exemplo: 


LET A$=STR$ cA+. 605) 
FOR P=1i TO LEN A$ 

IF A$cRo<>".” THEN NEST 
LET R$=A3c TO A+2)5 
RETUEN 











OO 0111 0100 0000 1100 1111 
ago 1000 0010 





transferência de bloco e pesquisa, um grupo de instru- 
ções específico do microprocessador Z80. 
As funções executadas por este grupo são as seguintes: 
— troca do conteúdo dos registradores principais com os regis- 
tradores alternativos; 
— troca do conteúdo de um registrador de 16 bits com o topo 
do STACK; 
— transferência de um bloco de bytes de uma área para outra 
área de memória; 
— pesquisa de um byte na memória. 
Vamos agora conhecer a operação destas instruções. 
1 — Troca do conteúdo dos registradores DE, HL 
Formato: EX  DE,HL 
Operação: Troca o conteúdo do par de registradores DE, 
com o par de registradores HL. 
Código objeto: 


/P| ara esta lição reservamos a descrição do grupo de troca, 


Ex DE , HL 


IDT] —+ es 


Descrição: Os dois bytes contidos nos registradores de 16 
bits DE e HL são trocados. 


EX DE, HL DE qu 

Ciclos de máquina (M): 1 

States (T): 4 

Flags afetadas: Nenhuma 

Como exemplo, se o par de registradores DE contém 2850H 
e o conteúdo do par de registradores HL é 5000H, após a ins- 
trução EX DE, HL o conteúdo do par de registradores DE será 
5000H e o par de registradores HL conterá 2850H. 


2 — Troca do par de registradores AF principal com alternativo 
Formato:EX  AF,AF” 
Operação: Troca o conteúdo do par de registradores AF 
com o par de registradores AF”. 
Código objeto: 
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Curso de 


Assembler — IX 


EX AF, AF! 


00001000)/-—pos 


Descrição:Os dois bytes contidos no par de registradores 
AF do conjunto principal de registradores é tro- 
cado com os dois bytes contidos no par de regis- 
tradores AF” do conjunto alternativo de registra- 
dores. 

Ex AF , AFº AF EE AF! 

Ciclos de máquina (M): 1 

States (T):4 

Flags afetadas: Nenhuma 

Como exemplo, se o conteúdo do par de registradores AF é 
1780H e o conteúdo do par de registradores AF” é FOO0H, 
após a instrução EX AF, AF*o par de registradores AF conte- 
rá FOO0H e o par de registradores AF" conterá 1780H. 


3 — Troca do conjunto principal com o conjunto alternativo 


Formato; EXX 

Operação: Troca o conteúdo dos registradores do conjunto 
principal com o conteúdo dos registradores do 
conjunto alternativo. 

Código objeto: 


EXxx 


[EESTITOT] —» m» 


Descrição:Os dois bytes contidos nos pares de registradores 
BC, DE e HL do conjunto principal são trocados 
com'os dois bytes contidos nos pares de registra- 
dores BC”, DE” e HL" do conjunto alternativo. 


EXXx 


Ciclos de máquina (M): 1 
States (T): 4 
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Flags afetadas: Nenhuma 
Como exemplo, se o conteúdo dos registradores é: 


CONJUNTO PRINCIPAL 


BC 1111H 
DE 2222H 
3333H 


CONJUNTO ALTERNATIVO 


BC nhnnH 
DE* 5555H 





HL' 6666H 
Após a execução da instrução EXX seu conteúdo será: 
CONJUNTO PRINCIPAL 
BC 4h4AH 


DE 5555H 
HL 6666H 


CONJUNTO ALTERNATIVO 


BC' 1111H 

DE* 2222H 

HL' 3333H 
4 — Troca do topo do STACK com HL 


Formato:EX (SP), HL 

Operação: Troca o conteúdo do topo do STACK com o 
conteúdo do par de registradores HL. 

Código objeto: 


EX (SP) , HL 


DODOOODO sc 


Descrição:O byte contido no registrador L é trocado com o 
byte do endereço de memória especificado pelo 
conteúdo do registrador SP (STACK POINTER) 
e o byte do registrador H é trocado com o byte 
contido no próximo endereço de memória (SP+1). 


EX (SP), HL Le (sr) 





ng (seem) 


Ciclos de máquina (M): 5 
States (T): 19(4,3,4,3,5) 
Flags afetadas: Nenhuma 
Como nao: se o de registradores HL contém 
7000H, o STACK PO! Re. 
memória 8800H contém o byte 11H e o endereço de memória 
8801H contém o byte 22H, após a instrução EX (SP), HL o 
par de registradores HL conterá 2211H, a posição de memória 
8800H conterá 00H, a posição de memória 8801H conterá 
70H e o STACK POINTER conterá 8800H. 
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contém 8800H, o endereço de” 


5 — Troca de topo do STACK com IX 


Formato:EX (SP), IX 

Operação: Troca o conteúdo do topo do STACK com o 
conteúdo do registrador IX. 

Código objeto: 


Elo VISP TX 


EEN on]—»oo 
Tot) —»es 


Descrição:O byte de mais baixa ordem contido no registra- 
dor de 16 bits IX é trocado com o byte do ende- 
reço de memória especificado pelo conteúdo do 
STACK POINTER e o byte de alta ordem é tro- 
cado com o byte contido no próximo endereço 
de memória (SP+1). 


EXP tSP Dos 1x, 4 (sr) 
x, q sp+1) 


Ciclos de máquina (M): 6 

States (T): 23(4,4,3,4,3,5) 

Flags afetadas: Nenhuma 

Como exemplo, se o registrador IX contém 2211H, o 
STACK POINTER contém A000H, o endereço de memória 
AQ00H contém 90H e o endereço de memória AOO1H contém 
45H, após a instrução EX (SP), IX o registrador IX conterá 
4590H, a posição de memória AO00H conterá 11H, o endereço 
de memória AQ01H conterá 22H e o STACK POINTER conte- 
rá AQO0H. 


6 — Troca do topo do STACK com IY 


Formato: EX  (SP),IY 

Operação: Troca o conteúdo do topo do STACK com o 
conteúdo do registrador IY. 

Código objeto: 


Ex (SP), Iy 


UIT Toa] —»+o 
nro oo 11]—»es 


Descrição:O byte de baixa ordem contido no registrador de 
16 bits IY é trocado com o byte do endereço de 
memória especificado pelo conteúdo do STACK 
POINTER e o byte de alta ordem contido no re- 
gistrador IY é trocado com o byte contido no 
próximo endereço de memória (SP+1). 


EX. (SP) EY Iv, 4 (sr) 
IvgP(sP+1) 


Ciclos de máquina (M): 6 

States (T): 234,4,3,4,3,5) 

Flags afetadas: Nenhuma 

Como exemplo, se o registrador IY contém 4050H e o 
STACK POINTER contém 9900H, o endereço de memória 
9900H contém 00H e o endereço de memória 9901H contém 
FFH, após a instrução EX (SP), IY o registrador IY conterá 
FF00H, o endereço de memória 9900H conterá 50H, o endere- 
ço de memória 9901H conterá 40H e o STACK POINTER ,, 
conterá 9900H e 
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7 — Transfere byte e incrementa 


Formato: LDI 
Operação: Transfere um byte, incrementa DE e HL e decre- 
menta BC. 
Código objeto: 
LDI 


OCO Do 
[010 0/000]—»ao 


Descrição:O byte contido no endereço de memória especifi- 
cado pelo conteúdo do par de registradores HL é 
transferido para o endereço de memória especifi- 
cado pelo conteúdo do par de registradores DE, 
incrementa os pares de registradores DE e HL e 
decrementa o conteúdo do par de registradores 


BC (Byte Counter). 
LDI (DEDE (HL) 
DE d-— DE+1 
HL 6 HL+1 
BC €-—— BC-1 
Ciclos de máquina (M): 4 
States (T): 16(4,4,3,5) 
Flags afetadas: S — não afetada 
Z — não afetada 
H — ressetada 
P/V — setada se BC-1 0. Senão, é ressetada. 
N — ressetada 
€ — não afetada 


Como exemplo, se o par de registradores HL contém 1111H, 
a posição de memória 1111H contém o byte 88H, o par de re- 
gistradores DE contém 2222H, a posição de memória 2222H 
contém o byte 66H e o par de registradores BC contém 7H, 
após a instrução LDI, o par de registradores HL conterá 2223H, 
a posição de memória 2222H conterá 88H e o conteúdo do par 
de registradores BC será 6H. 

Vejamos outro exemplo: mover 80 bytes consecutivos de 
BUFI para BUF2: 


LD HL |, BUF 1 
LD DE , BUF 2 
LD BC, 80 
Loor LDI 
IP PO , LOOP 
8 — Transfere um bloco de bytes incrementando 
Formato: LDIR 
Operação: Transfere um bloco de bytes de uma localização 
de memória para outra. 
Código objeto: 
LDIR 


10110000]|-——p8o 


Descrição:O byte contido no endereço de memória especi- 
ficado pelo conteúdo do par de registradores HL 





é transferido para o endereço de memória espe- 
cificado pelo conteúdo do par de registradores 
DE, os pares de registradores DE e HL são 
incrementados e o par BC é decrementado. Se o 
conteúdo do par BC for diferente de zero, a 
operação é repetida até que BC = 0. Se o valor 
inicial de BC for zero, a instrução LDIR irá mo- 
ver 64 Kbytes. 


LDIR (DE) 6 (HL) 
DE 4— DE+1 
HL 4 HLA 
BC 4d BC-1 
Ciclos de máquina (M): 5 
States (T): 21(4,4,3,5,5) 
Flags afetadas:S — não afetada 


Z — não afetada 
H — ressetada 


C — não afetada 
Como exemplo, se o par de registradores HL contém 1111H, 
o par DE contém 2222H, o par BC contém 3H, e estas localiza- 
ções de memória têm os seguintes conteúdos: 


(1111H) . 88H (2222H) : 66H 
(1112H) : 36H (2223H) : 59H 
(1113H) : ASH (2224H) : CSH 


Então, após a execução da instrução LDIR, o conteúdo des- 
tas áreas será o seguinte: 


(1111H) : 88H (2222H) : 88H 
(1112H) : 36H (2223H) : 36H 
(1113H) : ASH (2224H) : ASH 


E o conteúdo do par de registradores HL será 1114H, o par 
de registradores DE conterá 2225H e BC terá 0. 

Outro exemplo: mover 80 bytes consecutivos de BUFI para 
BUF2: 


LD HL |, BUF 1 
LD DE , BUF 2 
LD Bc , 80 
LDIR 

9 — Transfere byte e decrementa 


Fomato: LDD 
Operação: Transfere um byte e decrementa DE, HL e BC. 
Código objeto: 


LDD 


EEE Non] —»eo 
—m 


Descrição:O byte contido no endereço de memória especifi- 
cado pelo conteúdo do par de registradores HL é 
erido para o endereço de memória especi- 
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ficado pelo conteúdo do par de registradores DE LD HL, BUF 1 
e decrementa o conteúdo dos pares DE, HL e BC. 


LD DE , BUF 2 
LDD (DE) d-— (HL) 
LD BC, 80 
DE d-—— DE-1 
LOOP LDD 
HL dt HL-1 
IP PO , LOOP 
o, Etc Observem que neste caso a transferência é decrescente, isto 
Ciclos de máquina (M): 4 é, são movidos 80 bytes abaixo de BUFI. No caso de LDI, a 
“States (T): 16(4,4,3,5) transferência é crescente, ou seja, são movidos 80 bytes a par- 
Flags afetadas:S — não afetada tir de BUFI. 
Z — não afetad; 
H Brasa ; 10 — Transfere um bloco de bytes decrementando 
P/V — setada se BC-1£ 0; senão é ressetada 
hd Eber tin Formato: LDDR 
C — não afetada Operação: Transfere um bloco de bytes de uma localização 
Como exemplo, se o par de registradores HL contém 1111H, de memória para outra. 


a posição de memória 1111H contém o byte 88H, o par de re- a / 
gistradores DE contém 2222H, a posição de memória 2222H Código objeto: 

contém o byte 66H e o par de registradores BC contém 7H, en- LDDR 
tão a execução da instrução LDD resultará no seguinte: 


HL : 1110H (1111H) : 88H 11101101]—pED 
DE : 2221H (2222H) : 88H 10111000|-—DBs 


BC : 6M Descriçao:O byte contido no endereço de memória especi- 
Outro exemplo: mover 80 bytes consecutivos de BUFI para ficado pelo conteúdo do par de registradores HL ,, 
BUF2: é transferido para o endereço de memória especi- 48 











Im (OSS E] A impressora Elgin Lady é o novo padrão para aplicações profissionais 
em seu computador pessoal ou microcomputador. 
Com velocidade de 100 CPS, os caracteres impressos em matriz de pontos 


. u 
Ma ricial no formato 9 x 7, são de alta resolução. Com capacidade de 132 colunas, 
comporta até 264 caracteres/linha 
Através de uma tecla, em modo conversacional, 18 funções são disponíveis 
g n Fe | y para completa definição do formato de impressão, 


entre as quais 11 funções podem ser programadas via software. 
Com o módulo Elgingraph, a impressora Elgin Lady 
constitui a melhor escolha para seu microcomputador, 
em aplicações que requerem total flexibilidade gráfica 
através de caracteres semi-gráficos ou funções gráficas 
com endereçamento a nível de agulhas. 
As interfaces, intercambiáveis a nível de operador, 
capacitam a Elgin Lady a uma série de diferentes conexões 
Velocidade de impressão 100 cps com a maioria dos microcomputadores 
132 colunas a 10 cpi e sistemas disponíveis no mercado. 








Conheça a nova Elgin Lady em São Paulo: MICROSHOP - Fone: 282-2105 « COMPUTERLAND - Fone: 258-2954 e COMPUSHOP - Fone: 212-9004 
SERVIMEC - Fone: 222-1511 e IMARÉS - Fone: 881-0200 Campinas: COMPUTIQUE - Fone: 32-3810 
Rio de Janeiro: COMPUTIQUE - Fone: 267-1093 e CLAPPY - Fone: 253-7930 e TECNITRON - Fone: 233-9670 
Porto Alegre: INFORMATIQUE - Fone: 21-4189 + COMPUMÍDIA - Fone: 22-5061 


R 
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ficado pelo conteúdo do par de registradores DE, Após a execução de LDDR o conteúdo dos registradores e 
e os pares de registradores DE, HL e BC são de- posições de memória será o seguinte: 

crementados. Se o conteúdo do par de registra- HL : 1111H 

dores BC é diferente de zero, a operação é repe- 

tida até que BC =0. Se o valor inicial de BCfor DE : 2222H 

zero, a instrução LDDR irá mover 64 Kbytes. 





BC : 04 
LDDR (DE) d-— (HL) 
(1114H) : ASH (2225H) : ASH 
DE €-— DE-1 
(1113H) : 36H (2224H) : 36H 
HL dt HL-1 
(1112H) : 88H (2223H) : 88H 
BC d-— BC-1 
Ciclos de máquina (M): 5 o ia exemplo: mover 80 bytes consecutivos de BUFI para 
States (T):21(4,4,3,5,5) LD HL BUF 1 
Flags afetadas:S — não afetada 4 
Z — não afetada LD DE , BUF 2 
H — ressetada 
P/V — ressetada LD Bc , 80 
N — ressetada 
C — não afetada LDDR 
Como exemplo, se o par de registradores HL contém 1114H, Até a próxima aula. = 
o par de registradores DE contém 2225H, o par de registrado- “e 
res BC contém 3H e as posições de memória têm os seguintes 
contéudos: Amaury Correa de Almeida Moraes Junior é formado pelo curso de 
(1115H) : ASH (2225H) : CSH Análise de Sistemas da FASP, tendo feito diversos cursos de aperfeiçoa- 


mento nas áreas de Eletrônica Digital e Microprocessadores. 
s9H Amaury trabalha como Analista de Sistemas na PRODESP, na área de 
mini/microcomputadores, e presta consultoria a empresas para a instala- 
66H ção de sistemas de microcomputadores. 


(1113H) : 36H (2224H) 





(1112H) : 88H (2223H) 


A SUA EMPRESA AGORA 
TEM UM DEPARTAMENTO 
DE MICROINFORMÁTICA 


TUDO PARA 
MICROCOMPUTADORES 





* RAMCARD * SOFTCARD e VIDEOTERM * SOFTVIDEO SW e PROGRAMMER * PROTOCARD * INTF. DISKS 
* INFT. PRINT e SATURN 128K RAM. * SATURN 64K RAM. * SATURN 32K RAM. * RANA QUARTETO * MICROMODEM II 
* MICROBUFFER Il * MICROCONVERTER Il HH MICRO VOZ |l HH ULTRATERM E ALF 8088 CARD 
EE AS00 DISK CONT EE MULTIFUNCTION CARD 


MICROCRAFT MICROCOMPUTADORES LTDA. 
ADMINISTRAÇÃO E VENDAS: AV. BRIG. FARIA LIMA, 1.664 - 3º ANDAR - CJ 316 - CEP 01452 
FONES (011) 212-6286 E 815-6723 - SÃO PAULO - SP - BRASIL 





e Informamos novos erros verificados na listagem do pro- 
grama RENUM, da matéria Renumere seus programas em 
BASIC, MS nº 20, maio/83, págs. 70 a 81: 


Passo Correção 

570 21FOFF 

1530 CAÍI9IA 

1740 DDFOFF 
2000 FF7B 

2030 Incluir label TERM 
2040 Retirar a label TERM 
2460 CB78 

3010 4F 

3230 2B 


e Foi também constatado um erro no programa da Seção 
Conversão — Professor Corujinha, no TK82-C —, publicado 


e Na matéria Parabéns no dia certo, MS n9 24, setembro 
/83, pág. 93, a figura 1 mencionada no texto é a seguinte: 


500 DATA ALBERTO, "08/01/54" 
+ANA PAULA, "06/01/56", etc. 


e Na matéria Masterword: descubra a palavra (MS n9 23, 
agosto/83) foi omitido o seguinte parágrafo: “A rotina de 
som, escrita em linguagem de máquina, deve ser gravada em 
disco com a instrução BSAVE MASTERWORD. SOM, A$ 
302, L$19 antes do programa ser rodado”. 


e Na edição nº 24, setembro/83, na matéria de Newton 
Braga Júnior, “Simule um piano em seu teclado”, página 
40, segundo paragrafo, sétima linha, saíram errados os nú- 
meros das linhas que devem ser substituídas para a obten- 
ção de efeitos sonoros especiais. As linhas corretas, que são 
as constantes da listagem 2 da matéria, são as de número 


em MS nº 23, agosto/83, pág. 16. Na linha 220, onde se lê 


LETYS “1º..., leia-se: 15, 16e 45,e não 3,4e 11, como foi publicado. 


2201FYS < “1” ORYS > “3” THEN GOTO 210 Pedimos desculpas por nossa falha. 





Por baixo 
de um bom == 
computador 


só pode existir 
uma mesa ( 


As Mesas para Terminais H&M são tão boas quanto o 
seu computador. Sabe por que? Porque elas são feitas 


Tudo isso com a qualidade, 
tecnologia e tradição H&M que 








com o mesmo know-how e o mesmo critério de você já conhece, e que o seu | 
controle, segurança e precisão, como são feitos também computador está esperando para [RR 
os computadores. conhecer. j 

Além disso, as Mesas para Terminais H&M possuem Consulte-nos pelo telefone ou solicite á 
acabamento perfeito, fosfatizado e com fundo plaine. A a visita de um representante H&M. 
base é de poliuretano na cor grafite e o painel na cor gelo. Filiada a 
O tampo em todos os modelos é de madeira compensada ANFORSAI 


de mogno ou virola, com revestimento de fórmica fosca 
branca. 





Representantes em todo o Brasil 








Hanka Maldonado Ind. e Com. Ltda. SP: Lgo. Paissandu, 72 - 11º $/1112- Fones: 227-9925, 227-9060 e 227-8033 - Cx. Postal 7737 - Telegramas: “PASTANKA” RJ: Av. Frankin Roosevelt, 23 
8º - S/809 - Fones: 220-9179 e 220-7279. MG: Datamarketing-Prod. p/Proc. de Dados Ltda - R. Alagoas, 1460 - Cj 903 - Belo Horizonte - Fone: 225-9871 CE: João Bezerra Jr - R. Guilherme Ro- 
cha, 253 - Fortaleza - Fone: 226-9328. ES: LGC-Com. e Repr. Ltda. - R. Alberto de Oliveira Santos, 42 - S/1416 - Vitória - Fone: 223-1124. PR: SIMIGRA - Supr. e Equip. p/Computação Ltda. - R. 24 de 
Maio, 2937 - Curitiba - Fone: 224-9002. SC: SIMIGRA - Supr. e Equip. p/Computação Ltda. - R. Osmar Cunha, 15 - Bloco A - 8º andar - S/81 1 - Florianópolis - Fone: 23-1091. R$: Rosa Sapoiznyk - R 
Venâncio Aires, 495 - apto. 62 - Porto Alegre - Fone: 21-6089. MT e MS: Fortaleza - Com. e Repr. Lida. - R. Magnetita, 71 - Campo Grande - Fone: 382-0173. SE: Antunes Repr. Ltda - R. Laranjeiras, 151 
2º andar - Aracaju - Fone: 222-2307 PA: ASSISTE - Informática Lida. - Av. Nazaré, 272 - sala 506 - Fone: 225-0060. BA: José Augusto Vasconcelos - R. do Tira Chapéu, 06 - S/806 
Salvador - Fone: 243-8116. MA: ORMASIS - Org. Maranhense de Sist. e Serv. Ltda. - Av. Getúlio Vargas, 1746 - São Luiz - Fone: 222-0217. DF e GO: OVIDEO P. DE GODOY - SQS 107 bloco. K apto. 302 
Fone: 1061) 242-1790. AM, AC, RO e RR: Cap. de Dados Lida. - Av. Costa e Silva, 680 - Manaus - Fone: 237-1033 e 237-1793. PE, AL, PB e RN: LUHE - Com. e Repr - R. Dr. Miguel Vieira Ferreira, 
416 - Recife - Fone: 228-3224. Santos e Cidades Vizinhas: José Roberto F. Rodrigues - R. Egídio Martins, 149 - Ponta da Praia - Santos - Fone: 36-2256. Campinas: DIAP - Distr de Art p/Escritório Lida 
R. José Paulino, 582 - Campinas (SP) - Fone: 32-4133 


Na maioria dos micros pessoais, o 
usuário tem que conviver com uma 
série de limitações de capacidade de 
memória, periféricos etc. No APLY 
304 isso não acontece. 

Para começar, o APLY 308 é o úni- 
co micro pessoal brasileiro de sua 
classe que já incorpora interface se- 
rial R$-232C. Isso significa que ele 
pode operar com virtualmente todas 
as impressoras disponíveis no merca- 
do, além de comunicar-se com outros 
computadores. E muito breve você 
poderá utilizar também duas unida- 
des de disquete e gerador programá- 
vel de até oito cores. 

Seu processador Z-80A é um dos 
mais rápidos em uso no Brasil, com 
ciclo de clock de 3,25 MHz. Com a 
ampla memória RAM de 32 ou 48 
Kbytes, você não precisa espremer 
suas aplicações, nem fazer ginástica 
na programação. 

Mas não é só isso que o APLY 300 
se distingue dos demais sistemas. No 
vídeo, por exemplo, além de funcio- 
nar com qualquer TV preto e bran- 
co ou colorida, ele dispõe ainda de 
um conector de SVC (Sinal de Vídeo 
Composto) para TVs com adaptação 
de entrada direta de vídeo, o que per- 
mite maior nitidez de imagem. 


APPLY 300 








CARACTERÍSTICAS 

TÉCNICAS 

e Microprocessador Z80-A 

* Linguagem Basic 

e 8 Kbytes de ROM 

e 32 ou 48 Kbytes de RAM 

e 69 teclas tipo membrana 
flexível, com 154 funções 

e Joystick, Impressora (RS 
232-C) 

e Vídeo: Aparelhos de TV B e 
P ou Colorida 

e Gravação em fita cassete 
comum 

* Feedback auditivo no teclado 

e Bip programável e com 
memória 

e Tela para texto com 24 por 
32 caracteres alfanuméricos 

e Tela para gráfico com 44 por 
64 pontos gráficos 

e Teclas especiais: RUBOUT, 
EDIT, GRAPHICS, 
FUNCTION, etc. 


APLICAÇÕES 


e Programas educacionais 
* Jogos animados 









sr 


E para sua maior qualidade, a fon- 
te de alimentação, localizada no pró- 
prio corpo do aparelho, é capaz de 
fornecer três tensões que poderão ser 
utilizadas para dispositivos externos 
ao com 

Essas são apenas algumas das ca- 
racterísticas deste poderoso sistema. 
Venha vê-lo pessoalmente, você vai fi- 
car impressionado com o desempe- 
nho do APLY 304, o mais profissio- 
nal dos micros pessoais. 
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MICROCOMPUTADORES 


Centro de Desenvolvimento de Sistemas 
Eletrônicos Ind. Com. Ltda. 

Estrada do Galeão, 11 - sala 202 - 

Ilha do Governador - Rio de Janeiro - RJ 
CEP 21931 - Tel.: 396-4264 


* Jogos inteligentes 

e“ Estatística 

e Cálculos matemáticos 

e Finanças 

* Cálculos Estruturais 

* Controle de estoque 

* Controle de conta bancária 
* Orçamento doméstico 

* Gráficos 

e Programação Assembler 

e E muitas outras aplicações 














Interessantes descobertas na memória da TI-58 foram feitas por 
Robinson, de apenas 15 anos, que ainda conseguiu simular o LAST X da HP-41 nas TIs 





Um LAST X na TI-58C 


HP-41 tem uma instrução cha- 
mada X que recupera o 
último x operado. Na TI não 
possuímos esta instrução. Então, que tal 
tentar sintetizar ou achar um código que 
sirva como equivalente ao da HP? 

É muito difícil sintetizar alguma coi- 
sa na TI, pois a Texas utiliza apenas dois 
algarismos para formar o código da ins- 
trução. Em outras palavras, é impossível 
fazer uma instrução com código 123, 
por exemplo. 

Mas não vamos desistir. Já que o ne- 
gócio é criar códigos inéditos, podemos 
aproveitar os códigos que não são usa- 
dos pela calculadora. São eles: 21, 26, 





31, 41,46, 51, 56 e 82. Vamos testá-los 


agora. 
— Código 21: Digite: 
LRN 


STO 21 


Agora teste, digitando: 
RST 


a 
Surge no visor o valor de PI. Isso 
quer dizer que o código 21 corresponde 
à função 2nd. 
— Códigos 26, 41, 46, 51, 56: Não ser- 
vem para nada, até agora. 
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— Código 31: Digite: 


LRN 
STO 31 
BST 
BST 
2nd 
DEL 
ssT 
R/S 
LRN 
Agora teste, digitando: 

RST 


R/S 
O visor passa para o modo LRN. 
Quer dizer que o código 31 corresponde 
à função LRN. 
— Código 82: Digite: 


LRN 
STO 82 
BST 
BST 
2nd 


DEL 

SST 

R/S 

LRN 

Teste, digitando: 

RST 

R/S 
Apagará o visor, mantendo apenas o 
€ no lado esquerdo durante alguns se- 
gundos. Aí surgirá um zero piscando. 
Pressionando LRN, notaremos que a 
calculadora está com o apontador nc 
passo 239 (dependendo do particiona- 
mento). Por que isso aconteceu? Nós 


não colocamos um R/S depois da instru- 
ção 82? A única explicação para isso é 
que a instrução 82 saltou o passo seguin- 
te, ou então o aproveitou para endereça- 
mento. E fou isto o que aconteceu: a ins- 
trução 82 é como um STO ou um RCL 
que ocupa dois registros. Vamos retestá- 
la? Digite: 

RST 

32 


+ 

1 
ssT 
q 


E surge no visor o número 32. Aí 
está. Estamos começando a descobrir 
coisas interessantes na TI. 

Até aqui está tudo muito bom, tudo 
muito bem. Mas se testarmos SST 0... 
SST 60, ora, são mais 61 registros, que 
somados aos 60 registros normais da THS8 
dão 120 registros como na TH59 e mais 
um que talvez seja o T-Register. Porém, 
só podemos usar oito registros destes 
que nós descobrimos, que são os de 
R 11 até R 18. Assim, digite: 
2+(3+(43x(94....... 

Agora utilize o código 82 para os en- 
dereços de 11 até 18. 

Viu? Temos um ótimo LAST X. Po- 
rém, algumas perguntas devem ter fica- 
do na sua cabeça. Por que a Texas não 
explanou esta instrução no manual? Por 
que existe esta parte de memória na cal- 
culadora? 
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Uma coisa que acontece com a minha 
TI-58 talvez explique esta segunda per- 
gunta. A chave liga-desliga de minha TI 
é um pouco dura e às vezes quando eu a 
ligo e não puxo a chave com força, o 
visor fica fraco e a calculadora embara- 
lha os códigos em modo LRN. 

Outra vez, ao ligála, digites 
3 2nd OP 17. No entanto, em vez de 
aparecer no visor 239.29, surgiu 719.291 
Ainda espantado, digitei GTO 719, pres- 
sionei LRN e lá estava eu, no passo 719, 
normalmente, como se tivesse em mi- 
nhas mãos uma TI-59. Testei todo o par- 
ticionamento do SIZE da memória e 
constatei que a calculadora não estava 
cometendo erros. 

Na verdade, eu creio que o hardware 
da memória da 58 é o mesmo da 59, de- 
vendo existir um sistema operacional 
que deve barrar o uso integral da memó- 
na na TI-58. 

Bem, esse é o meu palpite. Não sei se 
está errado ou certo, mas estou esperan- 
do que vocês pesquisem esta situação 
para podermos discutir. Espero que 
aproveitem bem o LAST X que desco- 


brimos. = 
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Robinson dos Santos Pereira tem 15 anos e é 
estudante do Colégio Militar do Rio de Janei- 
ro na 12 Série do 2º Grau. Robinson também 
atua como Monitor no Curso de Programação 
de Micros do Colégio. 





Não pare seu programa 
nem perca a memória 


GERATRON 


[eT=Ig-to [o di = [cido al Toro Nado] dc LU] O [240 0) 


GUARDIAN 


Equipamentos Eletrônicos Ltda. 








Computador que se preza 


não dispen 


Programas para D 8002, CP 500, 
DGT 100, TRS 80, NAJA, JR 
e outros. Temos disponíveis 
mais de 50 programas para os 
micros acima e outros de maior 
porte. Consulte-nos. 


Folha de Pagamento 
Controle de Estoque 
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€ 
4 


N 
) 


Controle de Custos 
Arquivo de Processos 
Controle de Livros 
Controle de Cheques 
Biorritmo 

Decisão 

Obstáculo 

Kit Matemát. c/4 progr. 
Jogos Americ.(Fita c/4) 


sa um prato-feito. 


* Antes de comprar seu computador soli- 
cite nossa assessoria, sem compromisso, 
para análise, implantação e apoio. 

* Desenvolvemos qualquer tipo de softwa- 
re específico, de acordo com as necessi- 
dades de sua empresa. 

* Descontos para revenda. 


* Atendimento por reembolso para todo 
o Brasil. 


CURSO DE BASIC 
'urma limitada: máximo de 10 alunos. 
De 22a 5ºfeira, de 19 às 21,30 h. 
(20 h./aula). Aulas práticas, 
apenas 2 pessoas p/ computador. 


Av. Rio Branco, 45 gr. 1311- CEP 20090 
Tel.:-(021) 263-1241 — Rio de Janeiro 
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VEND 


classif 


SOFTWARE 


e Vendo programas para TK8B5: 
Folha de Pagamento, Agenda de 
Telefones, Controle de Estoques, 
Contas a Pagar/Receber, Fluxo de 
Caixa, Mala Direta, Processamen- 
to de Texto, Controle Bancário, 
Cadastro Clientes, Contabilidade 
Doméstica, Orçamento Domésti- 
co. Tratar com Bete pelo tel.: 
(011) 284-5635. 

e Vendo ou troco 160 progra- 
mas em fitas cassete: aplicativos, 
comerciais e jogos animados; na- 
cionais e importados, de 2K e 
16K para os micros: TKB2-C, 
NE-Z8000, ZX 81, TK85 ou CP- 
200. Carlos Sciarretti, Cx. Postal 
5567, CEP 01051, São Paulo, 
SP, tel.: (011) 522-8586. 

e Vendo ou troco programas de 
jogos para o TK e similares de ZK. 
Aos interessados tratar com Pedro 
Antonio, Rua Barata Ribeiro, 18/ 
1004, Copacabana, RJ, tel.: (021) 
275-3612. 

e Vendo programas para os mi- 
cros TK82-C, CP-200, NE-Z8000, 
ZX-81. Aos interessados solicitar 
lista com Renato Strauss, Rua 
Cardoso de Almeida, 654/32, CEP 
05013, São Paulo, SP. 

e Vendo diversos jogos em lin- 
guagem de máquina para o TK82- 
Ce TK85. Tratar com Marco An- 
tonio pelo tel.: 225-7507, Belo 
Horizonte, MG. 

e Vendo e troco programas para 
o TK82-C. Aos interessados, en- 
trar em contato com Moysés Al- 
ves de Lima, Rua José Amancio 
Ferreira, 23, Taboão da Serra, tel.: 
491-6816 (residência) ou 66-0342 
(comercial), SP. 

e Vendo 90 programas importa- 
dos para CP-200 e TK82-C; jo- 
gos como o King-Kong do flipera- 
ma, aplicativos, etc... Tratar com 
Júnior, Av. Senador Vergueiro, 
2685, BI. 11-A, apt. 104 ou 132, 
Rudge Ramos, São Bernardo do 
Campo, São Paulo ou pelo telefo- 
ne: (011) 449-3424. 

e Vendo programas de origem 
européia para TK82, TK85, CP- 
200 e NE-Z8000, lacrado em plás- 
tico. Cada fita custa Cr$ 4 mil e 
500. Tratar com Alexandre pelo 
tel.: (011) 203-4277, SP. 

o Vendo programas como Othel- 
lo, Asteróides, Gamão, Pacman, 
Flight Simulator e outros para o 
TK82-C e seus similares. Todos os 
programas são gravados em fita 
magnética. Tel.: (021) 226-8089, 
Rio de Janeiro, Alexandre. 

e Vendo programa de Análise 
Estrutural (Pórticos, Treliças e 
Vigas Contínuas) para HP-85. Tra- 
tar com Mário Miyake pelo tel.: 
1011) 228-6611 (dia) e 570-1520 
(noite) 


m fi 


Compro 





EQUIPAMENTOS 


e Vendo micro de bolso FX 702 
Pe FX 802P. Linguagem BASIC, 
com gravador acoplado, impresso- 
ra e interface. Acompanham pro- 
gramas e manuais. Tratar com 
Rubens pelo tel.: (011) 455-1940, 
sP. 


e Vendo TK82-C, com expansão 
de 16K, vídeo direto e inverso e 
função SLOW. Preço Cr$ 120 
mil. Ofereço os programas T-Kalc, 
Editor de texto para TK e SIN- 
COM. Telefonar para 350-3118, 
deixando endereço ou telefone 
para contato. 

e Vendo Xadrez Eletrônico, sete 
níveis de dificuldade. Acompanha 
esquema, programa listado e ma- 
nual de instrução. Tudo por Cr$ 
60 mil. Tratar com Ivo Dornas, 
Cx. Postal 20511, Tijuca, Rio de 
Janeiro. 

e Vendo HP-75C, cassete, vídeo, 
interface e impressora. Maiores in- 
formações pelo telefone (011) 
276-4622, SP. 

e Vendo um TK82-C, com ex- 
pansão de 16 K, ainda na garantia. 
Tratar com Annette Dreyer, Rua 
São José, 70, tel.: (021) 224-9788- 
(horário comercial). 

e Vendo um CP-200, cominstru- 
ção em Linguagem BASIC, semi- 
novo, na garantia. Tratar com Ro- 
naldo, tel.: (021) 259-9424, RJ. 

e Vende-se HP-41CV, impresso- 
ra, leitora (ótica e magnética), ba- 
terias, papel térmico, cartões, ma- 
nuais em português. Tel.: 239- 
9118. Tratar com Eduardo às 
21:00h, RJ. 

e Vendo Sinclair ZX-81 (Timex 
1000), com expansão de 16 K, 
cinco programas originais e um 
jogo de xadrez Sensory Chess 
Challenger (americano), tudo na 
embalagem. Tratar com Carlos, 
tel.: (011) 221-8082, à noite. 

e Vendo computador Prológica 
S 700, com impressora. Tratar 
com Dr. Eduardo Raful. Tel.: 
(0192) 32-1919, Campinas, SP. 

e Vendo uma calculadora Texas 
71-59, com impressora, incluindo 
vários programas de Engenharia 
Civil, cartões magnéticos e rolos 
de papel térmico. Preço de 350 
mil, ou troco por um microcom- 
putador. Tratar com Leonardo 
Matuda, Rua Bolívia, 400, tel.: 
254-5430, Curitiba, Paraná. 

e Vende-se HP-97, sem uso, por- 
tátil (bateria recarregável, pro- 
gramável, leitor/gravador p/dados 
e programas), impressora para saí- 
da de resultados e listagens de 
programas. Acompanham manu- 
ais, conjunto de 18 programas 
(matemáticos, financeiros, etc), 
cartões virgens, carregador de ba- 
terias para 110/220. Preço: Cr$ 
550 mil. Informações nos tels.: 
(021) 2629513 (Suely); (061) 
226-3558 (Vera); (011) 222-0229 
(Seima). 


e Vendo micro NE-Z8000, com 
expansão de 16 K, novíssimo. 
Acompanha manual de instruções 
e fitas com os jogos Labirinto Tri- 
dimensional e Demolidor. Tratar 
com Gerson Ferreira Pinto, Av. 
Pio XII, 350, Campinas, SP. 


e Vendo um JR Sysdata, 16 K, 
com mais 2 K de expansão; pra- 
ticamente sem uso; ótimo preço 
devido à urgência: Cr$ 295 mil, 
sem contra-oferta. Tratar com 
Sérgio, tel.: 275-4007, São Paulo. 


e Vendo um computador da 
Prológica, modelo CP-500, com 
48 Kbytes e um drive. Tratar com 
Laerte Rosselli na Rua Piratinin- 
ga, 449, São Caetano do Sul, SP, 
tel.: (011) 4539449 ou 442- 
7595. 


e Vendo xadrez eletrônico com 
diagrama esquemático completo, 
Chess Challenger Americano, com 
micro ZX80 A, sete níveis. De- 
senho do circuito impresso, pro- 
grama completo, opção EPROM 
gravada. Somente Cr$ 2 mil e 
500. Tratar com Antonio pelo 
tel.: 254-6815 ou 263-3171, RJ. 





e Procuro pessoas interessadas 
em trocar informações sobre de- 
senvolvimento de programas de 
ensino de matemática para crian- 
ças. Tratar com Sílvio Vasconce- 
los no sguinte endereço: Rua Ta- 
bapuã, 266, apt. 31, São Paulo, 
CEP 04533 ou pelo tel.: (011) 
64-5001. 

e Tenho o “Users! Library” de 
jogos e procuro quem tenha o de 
matemática e/ou o de Eng. Solar, 
pois necessito de alguns progra- 
mas existentes neles. Paulo Bas- 
tian Krouwel, Rua Antonio Salo- 
mon, 162, 37500, Itajubá, MG. 


e TIGER CLUBE — Estamos 
formando um grupo de usuários 
do TRS-80 Ill, CP-500 e similares. 
Consulte-nos e receba todas as in- 
formações gratuitamente. Cx. 
Postal 23095, Rio de Janeiro, RJ, 
CEP 20922. 

e Possuo um DGT-100, 16 K, 
versão cassete e gostaria de me 
corresponder com usuários desse 
equipamento, para troca de pro- 
gramas (jogos aplicativos em ge- 
ral). Escrevam para Rodrigo Cesar, 
Rua Cel. Pedro Dutra, 212, Bair- 
ro Jaraguá, Belo Horizonte, MG, 
CEP 30000. 

e Gostaria de entrar em contato 
com Radioamadores que estejam 
utilizando os micros de tecnologia 
Sinclair, para decodificar CW e 
Rtty. Interessados escrever para 
RADIOMICRO, o primeiro grupo 
brasileiro de Radioamadores digi- 
tais do Brasil. Informações com 
Renato Strauss, Rua Cardoso de 
Almeida, 654/32, CEP 05013, 
São Paulo, SP (PY2-EMI). 


a 


DIVERSOS 


e TRS DOS ou compatíveis: tro- 
co logotipo e coloco sua mensa- 
gem. Nilson, tel.:(021) 392-8977. 


e Expande-se hardware de DGT- 
100, tornando-o aplicável ao uso 
científico e tecnológico. Cx. Pos- 
tal 14717, Ipanema, RJ. 


e Compro revistas MICRO SIS- 
TEMAS do nº 1a0 nº 14, pago 
preço atual. Interessados liguem 
para (021) 225-5511, Pedro, após 
as 17:00h. 


e Ofereço serviços de consulto- 
ria, programação e análise para 
HP-85, nas áreas Administrativa, 
Técnico-científica e comercial. 
Preço máximo (para grandes siste- 
mas) = 20 ORTN's; mínimo =3 
ORTN's. Também compro livros 
técnicos (novos ou usados), em in- 
glês ou português, principalmente 
sobre hardware e programação 
COBOL/BASIC. Tratar pelo tele- 
fone (021) 266-4852 rl.: 398 ou 
Rua Visc. Ouro Preto, 5, 13º an- 
dar, Botafogo, Rio, CEP 22250 
(Daniel Vieira). 





e Gostaria de informações sobre 
a linguagem de máquina do TK82- 
C. Escrevam para Luís Rogério 
Dupont, Rua Arthur Leopoldo 
Ritter, 164, Estância Velha, RS, 
CEP 93600. 

e Procuro pessoas interessadas 
em me fornecerem dicas, mace- 
tes e até mesmo programas em 
BASIC, o que eu procurarei retri- 
buir. Escreva para Sérgio Tajal, 
Rua Carlos Von Koseritz, 261, Hi- 
gienópolis, Poa, Rio Grande do 
Sul. 

e Aos usuários do VIC 20 e Co- 
modore 64: Acabamos de lançar 
o primeiro clube Comodore do 
Brasil. Temos muitas dicas. servi- 
ços de reparo e reposição, muito 
software para troca e estamos or- 
ganizando uma biblioteca com li- 
vre acesso (modem, carta ou pes- 
soalmente). Associem-se ao nosso 
clube, cuja única finalidade é o in- 
tercâmbio de material para os 
computadores citados. Estamos a 
seu dispor para maiores informa- 
ções no CSI — Comodore Soft- 
ware Interchange, Rua Haddock 
Lobo, 1663/122, Jardim América, 
São Paulo, CEP 01414, ou pelo 
telefone: (011) 282-7068. 

e Tenho um Texas Instruments 
99/4A e um Sinclair ZX Spectrun 
e gostaria de manter contato com 
pessoas que possuam o mesmo 
equipamento para intercâmbio de 
programas. lan Gordon Hall Dun, 
Cx. Postal 05, Jacupiranga, SP. 

e Boletim-Clube para os usuários 
de TK/NE/CP. Anúncios grátis. 
Informações: Grande Circuito, 
Cx. Postal 28, CEP 27200, Piraí, 
RJ. 
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de taxas, regressão linear; o que você quiser. Adicione « 
isso 5 memórias, 32 passos de programas, duas bateria: 
com 2000 horas de duração e um opcional muito útil: c 
impressora PC-200, que pode ser fo [ooo] [o [o [6 To ET Io Toto | 
fot fofo [elfo Rijo fofo do (fo fo [o Tejo (fo Loto |[olhifo [oh (cia) o lo Ko IN 
sobra para você pegar uma sauna, tomar seu cho 
pinho ou, melhor ainda, fazer isso mesmo que voce 

está pensando. Nova BA-55 da Texas Instrumentos 
é Relaxe e aproveite 


Nile [efe [E => (10H) [N/of=]o [Fi£o Wide to fofo [lo bojo [ob fo rá) nto (o) 
coisas cansativas como calcular juros, balanço, 
balancete, ORTN, IPI, ICM, INPC etc. Felizmente, 
a Texas Instrumentos lançou a BA-55: a mais 
[o fo [p[o7o [o [o Loto |[otH | [o [o [o fo Bila To In fot=] o 
estatística programável. A BA-55 executa 
um número incalculável de operações: valor 
presente, valor futuro, taxa interna de retorno, 
LIT) foro [=Zo7o [| (o Bio [SUN iTo Fofo [o [fo To Mioto) pic] tio fo] 


TEXAS INSTRUMENTOS 
[Oo pil= 0 ),0,6-]40/0 100 8//0/4 
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O depoimento de vários usuários sobre a importância dos jogos em computadores 


e sobre os problemas de sua programação 





À programação de jogos 


ão há quem possua um micro 
pessoal que não dispute suas 
guerrinhas espaciais de vez em 
quando. Alguns até compraram o mi- 
cro justamente para isso, seja pela ânsia 
do modismo, seja pela lábia do vende- 
dor. O certo é que a indústria do lazer 
eletrônico é uma das mais rentáveis da 
área de Informática e isto pode ser fa- 
cilmente sentido no Brasil. 

Mas como é programar um jogo? 
Existem técnicas especiais de programa- 
ção? Qual a melhor linguagem a ser uti- 
lizada? Programar um jogo é diferente 
da programação dita “séria”? Jogar com 
um micro é alienante? 

Tentando mostrar um pouco do ou- 
tro lado dos programas de jogos, MI- 
CRO SISTEMAS fez estas e outras per- 
guntas para vários usuários de micros 
pessoais que se interessam de uma ma- 
neira ou de outra pelos jogos em compu- 





tadores. Além disso, mostramos os jogos: 


“mais vendidos nas lojas do Rio e São 
Paulo e apresentamos os videogames, 
equipamentos específicos para jogos. 


PROGRAMAS DE JOGOS 


Há vários tipos de jogos para micros 
pessoais. Basicamente, temos os jogos de 
animação (guerras espaciais, corridas de 
carro e jogos esportivos); os jogos de es- 
tratégia (adventures); os jogos tradício- 
nais simulados no computador (Xadrez, 
Gamão, Cartas etc) e os jogos educati- 
vos, do tipo “aprenda brincando”. 

A maioria das lojas especializadas es- 
tão repletas de programas de jogos — es- 
trangeiros em sua esmagadora maioria — 
em fitas cassete ou em disquete, cobrin- 
do praticamente todas as linhas de mi- 
cros. Seus preços variam conforme a 


140 


procedência e o meio onde está armaze- 
nado. Por exemplo, um programa em 
cassete nacional (jogos estrangeiros 
adaptados ou copiados por empresas 
brasileiras) custa em média Cr$ 10 mil; 
se a fita for importada, seu preço vai 
para perto dos Cr$ 20 mil, e se o jogo 
estiver em disquete o acréscimo será 
ainda maior, devido ao próprio preço do 
disquete flexível. 

Os jogos comerciais geralmente são 
muito bem feitos e impressionam pela 
apresentação no vídeo. Eles utilizam-se 
largamente da linguagem Assembler, fa- 
zendo sub-rotinas ou o programa intei- 
ro nesta linguagem, de modo a permitir 
rapídez, qualidade e alta resolução grá- 
fica na animação. Entretanto, nada im- 
pede que um usuário faça em seu pró- 
prio micro um bom jogo usando BASIC, 
sem ficar devendo em nada aos bons 
programas profissionais. 


BOM PARA O INICIANTE 


Teoricamente, qualquer pessoa que 
tenha uma experiência mínima na pro- 
gramação de uma linguagem como o 
BASIC pode fazer seus próprios jogui- 
nhos. 

Mas, será tão simples assim? 

Newton Braga Junior, Gerente da lo- 
ja carioca Rio Micro e proprietário de 
um DGT-100 e de um TRS Pocket Com- 
puter, acha que programar um jogo re- 
quer muito tempo e conhecimento dos 
recursos da máquina, principalmente pa- 
ra a animação de figuras e para simular 
determinadas funções que não constam 
dos repertórios de comandos das lingua- 
gens tradicionais. Newton começou a 
usar micros (um NE-Z8000) fazendo 
programas de jogos. “Eu acho que o 


software de jogo é um grande passo pa- 
ra quem quiser passar depois para uma 
programação mais séria, porque ele puxa 
muito do programador. Além disso, não 
é uma programação rígida: é bem fle- 
xível e criativa”, comenta ele. 

Outro aficcionado e profundo conhe- 
cedor de micros, o desenhista industrial 
Renato Degiovani, é autor entusiasta de 
vários jogos para o TK82C, alguns já 
publicados em MICRO SISTEMAS 
(Aeroporto 83, Aventuras na Selva). Em 
termos de técnica de programação, De- 
giovani acha que o mais importante na 
hora de programar um jogo é saber usar 
o vídeo. “O visual é muito importante”, 
conta ele. “Não adianta você querer for- 
çar o usuário a aceitar um simples X pa- 
rado num canto como um perigoso inva- 
sor espacial que ele não vai engolir. Ago- 
ra, se este X se movimentar rapidamen- 
te, apagar-se num lugar para reaparecer 
de surpresa em outra parte do vídeo ou 
mesmo ao lado de seu canhão, aí sim o 
usuário “sentirá” um invasor personifica- 
do nele”. 

Renato também acredita que progra- 
mar um jogo não é fácil. “Um bom pro- 
gramador profissional nem sempre fará 
um bom jogo. É preciso ter muita sen- 
sibilidade e conhecer profundamente a 
parte de vídeo da máquina”. 

“Antes de fazer um jogo, eu imagino 
na minha cabeça como ele será e daí 
parto para escrever o programa”. Bruno 
Barrasch, 18 anos e recém-ingresso num 
curso de Engenharia em São Paulo, acha 
que os jogos em computadores podem 
auxiliar bastante quem está começando, 
pois através deles se aprende a lingua- 
gem e os recursos da máquina. “Nos jo- 
gos dinâmicos”, conta Bruno, “é essen- 
cial que o programador conheça os re- 
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cursos gráficos e as “manhas” da máqui- 
na para obter maior velocidade. Já nos 
jogos de inteligência, os adventures, é 
preciso dominar a memória da máqui- 
na e suas funções. Nos dois casos, de 
qualquer maneira, tem que se conhecer 
muito bem a linguagem que se está uti- 
lizando” 


DINÂMICA 


Estudante de Engenharia da Grande 
São Paulo como Bruno, Fábio da Cunha 
há alguns anos programa micros e 
calculadoras e recentemente esteve nos 
Estados Unidos para participar de uma 
série de cursos de hardware e software 
para micros. Ele vê a elaboração de um 
jogo como uma tarefa metódica. “Para 
programar um jogo”, conta ele, “em pri- 
meiro lugar você tem que ter uma boa 
idéia do que quer do jogo. Depois é que 
você começa a detalhar mais os aspectos 
gerais, passando então para as partes 
bem específicas, como contagem de 
pontos etc. Quando eu escrevo um pro- 
grama de jogo, faço um algoritmo bem 
em cima da linguagem que estiver usan- 
do, para ter certeza de que a lógica está 


rença entre programar um jogo e a pro- 
gramação normal. “Num programa co- 
mercial, você tem muito menos coisas 


para se preocupar, porque ele tem um 
comportamento bem definido. Num jo- 
go, existem muitos fatores, sendo o 
principal a dinâmica: um bom jogo tem 
que ser atrativo, não ser cansativo e deve 
oferecer ao final uma sensação de bem- 
estar para O jogador; de conquista mes- 
paço 


UMA BOA IDÉIA 


“(...) Todo jogo parte de uma idéia. 
Escreva-a! Coloque no papel os objeti- 
vos e características básicas que você de- 
seja ver no jogo, regras de utilização, re- 
cursos a serem utilizados etc”. (extraído 
do artigo Anime-se ... e faça bons jogos 
em BASIC, MS nº 23, agosto/83). 

Renato Sabbatini, médico, professor 
universitário e profundo conhecedor de 
microcomputadores, surpreendeu a mui- 
tos leitores de MICRO SISTEMAS — 
que já o conheciam pelos seus artigos so- 
bre o uso de micros na Medicina — ao 
publicar um artigo com dicas de anima- 
ção gráfica em BASIC para uso em jo- 
gos. Sabbatini diz gostar muito de pro- 
gramar jogos educativos para qualquer 
faixa etária e acha que no Brasil poucos 
conseguiram alcançar o nível dos países 
estrangeiros na elaboração de progra- 
mas de jogos para micros ais. “Na 
Europa, Estados Unidos e Japão existem 
laboratórios de pesquisa com técnicos 


trabalhando exclusivamente em jogos”, 
conta ele. 

Renato Sabbatini concorda que para 

programar um jogo é necessário um bom 
aproveitamento dos recursos da máqui- 
na (“a dinâmica é muito grande”) mas 
discorda quando ouve falar que os jo- 
gos são alienantes. “É o contrário”, 
ele comenta, “se fôssemos considerar os 
jogos alienantes poderíamos colocar a 
leitura e o cinema no mesmo nível, pois 
são atividades solitárias. O jogo, mesmo 
quando executado por uma só pessoa, é 
estimulante e gratificante; quando parti- 
cipam vários jogadores, ele passa a ser so- 
cializante, principalmente entre crian- 
ças”. 
Outra afirmação comum, de que os 
jogos aumentam a agressividade das pes- 
soas, também é rechaçada por Sabbati- 
ni. “Há vários estudos de Psicologia que 
provam que os jogos esvaziam a agres- 
sividade, pois são usados como um esca- 
pe natural”, conta ele. “É lógico que já 
apareceram alguns jogos que poderiam 
ser perigosos, mas logo foram proibidos, 
como aquele em que o alvo era um ín- 
dio e provavelmente estimularia o racis- 
mo” 


O Engenheiro Kazimierz Malachows- 
ki, de São Paulo, concorda com Sabbati- 
ni. Proprietário de um TK82 e autor 
do jogo Jornada nas Estrelas, publicado 
nesta edição, Kazimierz acha que os jo- 
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A PROGRAMAÇÃO DE JOGOS 


gos de computador tanto podem ser 
alienantes quanto educativos. “Quando 
são repetitivos e viciadores, eles alie- 
nam. Os educativos, porém, desenvol- 
vem os reflexos motores e, dizem, até a 
inteligência. Mas”, completa Kazimierz, 
“não há como negar a importância do 
computador como meio de comunica- 
ção e, como todos os meios, ele precisa 
ser usado com uma certa dose de cuida- 
do”. 

Já o Engenheiro, Físico e Professor 
da UNESP, Antonio Eduardo Costa Pe- 
reira, compara a agressividade dos jogos 
com a do cinema, “pois os filmes tam- 
bém podem agredir. Há agressividade em 
todas as áreas”, comenta ele, “depende 
apenas de quem a produz. Eu uso jogos 
na educação e por isso não posso con- 
siderá-los agressivos e muito menos alie- 
nantes, por experiência própria”. 

O Prof. Antonio Costa é um dos pou- 
cos programadores brasileiros que utili- 
zam a linguagem Forth regularmente. 
Forth é considerada como a melhor lin- 
guagem para a programação de jogos (os 
jogos da Atari, por exemplo, são quase 
todos em Forth), com o que concorda 
Antonio Costa. “Eu prefiro o Forth pela 
praticabilidade que ele oferece. Em rela- 

-ção ao BASIC, o Forth possibilita uma 
economia de memória quatro vezes maior 
e sua velocidade em cálculos numéricos é 
10 vezes maior. Para o Assembler, ele só 
perde em velocidade, enquanto ganha 
em memória”. 


POUCAS NOVIDADES 


Comentando uma frase do Prof. An- 
tonio Costa (“... Quase todos os jogos 
existentes são adaptações de outros e 
poucas são as idéias novas"), Renato De- 
giovani fez alguns comentários impor- 
tantes. Eis seu depoimento: 

“Na realidade, você não tem mais do 
que uns dez jogos diferentes. Por uma 
questão de mercado, eu acredito, a 
maioria é uma variação para melhor ou 
pior de alguns jogos consagrados como 
o Space Invaders, o Labirinto e o Pack 
Man, entre outros. No caso do Brasil, 
temos ainda o problema das adaptações 
de jogos estrangeiros, que trazem de- 
terminadas situações que não encontram 
uma identidade em nossa cultura. Por 
exemplo, no Brasil um terreiro de ma- 
cumba é muito mais sinistro do que um 
castelo mal-assombrado. Mas todos sabe- 
mos quantos jogos nós, que nunca tive- 
mos castelos, vemos por aí utilizando 
este tema. O ideal é que coloquem os 
programadores para criar jogos dentro 
de nossa realidade e não apenas para 
descobrir como se copia. Afinal, se você 
paga alguém para traduzir do inglês, 
por que, ao invés, não paga para criar?” 
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Degiovani chama a atenção ainda pa- 
ra uma sutil subversão de valores sociais 
nos jogos. “O jogo é um mundo diferen- 
te, onde os valores são manipulados de 
maneira imperceptível. O jogador algu- 
mas vezes se sente um Deus dentro do 
universo, podendo decidir sobre a sorte 
de outros seres sem nenhum escrúpulo. 
Numa corrida de Fórmula 1, o cara pla- 
neja com todos os detalhes um desas- 
tre que poderá matar vários pilotos. To- 
dos os jogos são, na realidade, uma cons- 
tante luta do jogador contra sua pró- 
pria morte e pela destruição de seus an- 
tagonistas. Veja por exemplo, um pro- 
grama de guerra espacial: quanto mais 
bonita for a explosão, quanto mais es- 
tilhaços e mais mortes ela tiver, mais in- 
teressante ela será!” 


Livros sobre Jogos 


Nas principais livrarias do Rio e São 
Paulo, nossa pesquisa encontrou os se- 
guintes títulos sobre o assunto Jogos: 


AHL, BASIC Computer Games, 1978 

AHL, More BASIC Computer Games 
(TRS-80 Edition) 

BLOOM, Video Invaders, 1982 

CHANCE, 33 Challenging Computer 
Games for the TRS-80/Apple/ 


. PET 

COLE, Murder in the Mansion and 
other Computer Adventures in 
Pocket BASIC for the TRS-80, 
1981 

FISHER, PET Fun and Games, Selec- 
ted Cursor Programs 

FRANKLIN, Golden Games for the 
Apple Computer, 1982 

HEISERMAN, How to design & build 
your own custom TV Games 

'HERGERT, Apple Pascal Games, 1981 

HORM, 34 More Tested ready to run 
game programs in BASIC, 1981 

KOHL, aan Games and recreation, 
1 

McINTIRE, The A to Z Book Compu- 
ter Games: 26 exciting and ins- 
tructive programs 

NAHIGIAN, Computer Games for the 
TRS-80, 1981 

OGLESBY, PET Fun &Games, 1981 

REESE, Simulation games and lear- 
ning activities kit for the ele- 
mentary school 

SKIER, Beyond Games: Systems soft- 
ware for your 6502 Personal 
Computer 

TRACTON, 24 Tested ready to run 
game programs in BASIC, 1978 

CHIU, Crunchers: 21 simple games 
se the Timex/Sinclair 1000 
2 


Texto: Paulo Henrique de Noronha 
Apuração SP: Stela Lachtermacher e Cláudia 
Salles Ramalho. 
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Os Simuladores de Vôos não são propria- 
mente jogos, mas sim programas que simu- 
lam o vôo em um avião, com todos os requi- 
sitos técnicos para se navegar nos céus. Nor- 
malmente, é necessário que o usuário saiba 
as regras básicas para se pilotar um avião de 
modo a aproveitar inteiramente o “vôo”. 
Porém, todos os jogos costumam trazer uma 
farta documentação para ser estudada e per- 
mitir que qualquer um decole mesmo sem 
ter tirado vé e hd também os programas 
“Instrutores”, que são simuladores para. 
aprendizagem de vôo. 

No Rio e em São Paulo são encontrados 
simuladores para as linhas Sinclair (em fita 
importada), TRS$-80 e Apple, este último 
com alta resolução gráfica e cores. 





O TKMAN é uma versão do famoso Pack 
Man para os micros da linha Sinclair, e é 
comercializado no Brasil pela Microsoft 
(Microdigital). O objetivo do jogo é des- 
truir os pontos que estão no labirinto pas- 
sando por cima deles, sem esbarrar nos 
monstrinhos que o perseguem para destruí- 
lo. Você poderá passar pelos monstros ape- 
nas oito vezes antes que o jogo acabe e, se 
tiver reflexos para tanto, lerá afastá-los 
para um dos extremos do labirinto utilizan- 
do-se de um canhão laser, que tem energia 
limitada. 

Há quinze diferentes tipos de labirintos 
e vários níveis de dificuldade, que vão au- 
mentando à medida que se fazem mais pon- 
tos no jogo. 
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Os mais vendidos 


MICRO SISTEMAS fez uma rápida pesquisa entre as principais lojas do Rio e 
São Paulo para ver quais são os jogos mais procurados para micros pessoais. 
No Rio, foram procuradas as lojas Computique, Ipanema Micro, Garson, Kristian, 
Micro-Kit, Clappy, Microcenter e Nasajon Sistemas; em São Paulo, a 
Computerland, Compushop, Microshop, Audio e Imarés. 





No Cosmic Fighter você é obrigado a re- 
sistir ao ataque de alienígenas que ficam flu- 
tuando no seu céu até que surja sua nave- 
mãe para recolhélo a bordo, são e salvo. 
De vez em quando, você também irá sofrer 
o ataque de uma poderosa nave inimiga, 
mais rápida e precisa que as outras, exigindo 
de você muita atenção para não ser elimi- 
nado. Além disso, quando sua nave-mãe apa- 
rece para salvá-lo, esta poderosa nave inimi- 
ga irá colocar-se entre ela e você, numa últi- 
ma tentativa para destruílo. É o momento 
culminante do jogo. O Cosmic Fighter é en- 
contrado em versão para a linha TRS-80 nas 
lojas do Rio e São Paulo. 





No Sabotagem você tem que defender 
sua base antiaérea do ataque de helicópte- 
ros inimigos que dão rasantes, lançando pá- 
ra-queuistas sabotadores sobre sua posição. 
Sempre que você deixar que mais de três pd- 
ra-quedistas cheguem com vida ao chão, sua 
sorte estará selada, pois uma invencível 
equipe de sabotagem estará formada e logo 
sua base irá pelos ares. 

Mas não é só: após atingir 50 pontos, sur- 
girão os bombardeios com projéteis rápidos 
e precisos e, se mesmo assim você teimar em 
resistir, os helicópteros voltarão com uma 
verdadeira chuva de pára-quedistas que irão 
lhe dar bastante trabalho. 


Dentre os jogos mais procurados para 
micros. pessoais de todos os modelos, está o 
Xadrez. Há várias versões no mercado, como 
o Microchess 2.0 (na foto), o on KH, o 
TKADREZ (para a linha Sinclair ZX81), e 
muitos outros. Um programa de Xadrez 
consiste em fazer do computador um par- 
ceiro frio e paciente para jogar com o ser 
humano. Normalmente, há vários níveis de 
dificuldade, do iniciante ao expert, e opções 
para: iniciar uma partida, de brancas ou de 
pretas; começar a jogar a partir de uma de- 
terminada posição; colocar um problema pa- 
ra o computador resolver; imprimir a parti- 
da recém-jogada; guardar em disquete ou 
fita um jogo interrompido para posterior 
continuação etc. 
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O Galaxy Invaders é o jogo mais procura- 
do no Rio e em São Paulo para os micros da 
linha TRS-80 (CP-500, DGT-100 etc). O Gal 
(como é conhecido nas lojas) é na verdade 
uma versão do famoso Space Invaders. A 
diferença é que os invasores não vão se apro- 
ximando de seu canhão: eles saem de suas 
peerõas em rápidos rasantes sobre você, exi- 
gindo bastante atenção para escapar. Com o 
desenvolver do jogo, os invasores vão dando 
mais e mais rasantes, às vezes quatro ou cin- 
co de uma só vez, ficando cada vez mais di- 
fícil sobreviver ao ataque. 








Exclusivo para micros compatíveis com 
o Apple que possuam disquetes, o Olympic 
Decathlon, da famosa software house ame- 
ricana Microsoft, reproduz de maneira bem 
original a mais difícil das provas do Atle- 
tismo:o Decatlon, na realidade um conjunto 
de dez provas, como lançamento de dardo, 
salto em altura, 100 metros rasos e outros. 
Com o simples apertar de duas ou mais te- 
clas, o jogo simula cada uma das dez pro- 
vas seguindo estritamente as regras olim- 
picas. Na corrida, por exemplo, o jogador 
deve ficar atento ao tiro de partida e então 
sair correndo, apertando as teclas 1 e 2 re- 
petidamente, uma de cada vez, com a maior 
velocidade possível; no salto em altura, dá-se 
a velocidade com que o jogador irá correr 
para saltar, e controla-se o momento do 
pulo e o ângulo do salto através das teclas 
Xe ESC. 


No meio de um tenebroso labirinto, você 
é obrigado a fugir de um faminto Tiranos- 
sauro Rex, um monstro carnívoro da pré- 
história. Enquanto você percorre o labirin- 
to em busca de uma saída, as mensagens vão 
aparecendo no vídeo: Rex o aguarda; Passos 
se aproximando; Rex já viu você; FUJA. 
Rex está a seu lado Se você tiver o azar de 
topar frente a frente com ele, poderá vis- 
lumbrar a sua monsimosidade fatal, com 
tempo de escapar. Mas, ds vezes, você só te- 
rá tempo de sentir sua enorme dentadura 
devorando-o inapelavelmente. 

O Monstro das Trevas é comercializado 
pela Microsoft e é o jogo mais procurado nas 
pos do Rio e São Paulo para a linha Sin- 
clair. 





Fotos: Mônica Leme e Renato Degiovani 

Os programas ni Renders cedidos pe- 
las lojas Clappy e Computique, ambas do 
Rio de Janeiro. 
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As primeiras experiências com computa- 
dores no campo do lazer só começaram a ser 
feitas ao final da década de 50, com progra- 
mas para jogar Xadrez contra computadores 
de primeira e segunda geração. A intenção 
não era e rs utilizar o computador 
para jogar Xadrez, mas sim tentar reprodu- 
zir em máquina o funcionamento da mente 
humana, a “máquina perfeita”. 

O primeiro jogo mesmo só surgiu em 
1962, quando Steve Russel, um estudante 
de computação do Massachussets Institute 
of Technology (MIT) resolveu criar um pro- 
grama de entretenimento sob a inspiração 
futurística das máquinas com que trabalha- 
va. Após um dia inteiro de pro; ação 
com linguagens comerciais e científicas, nas- 
ceu o Spacewar (Guerra Espacial), que em 
pouco tempo tornou o nome de Russel uma 
pequena lenda entre os programadores da 
época. 

A iniciativa de Steve Russel foi o incenti- 
vo para outros pioneiros como Ralph Baer 
e Nolan Bushnell. Dez anos depois do Space- 
war, Baer conseguiu colocar em prática uma 
velha idéia que tinha para o aproveitamento 
dos televisores domésticos, lançando o Mag- 
navox Odissey, o primeiro aparelho de vi- 
deogame comercializado. Pouco tempo de- 
pois, Nolan Bushnell, após testar com incrí- 
vel sucesso num night-club da Califórnia 
uma máquina eletrônica que simulava num 
vídeo o jogo de Ping-Pong para duas pessoas 
jogarem entre si com joysticks, fundou a fa- 
mosa Atari, uma fábrica de videogames, 
micros pessoais e programas de jogos que lo- 
go viria a tornar-se um símbolo do jogo 
computadorizado e, três anos depois, acaba- 
ria sendo incorporada pela Warner Bros. 


BRINQUEDOS E ARCADES 


Fora os jogos para micros pessoais, po- 
deríamos dividir os jogos de computação em 
três tipos, todos integrantes rotineiros do 
lazer de adolescentes e adultos nos países 
desenvolvidos: são eles os brinquedos ele- 
trônicos, os arcade games e os videogames. 

Os brinquedos eletrônicos englobam vá- 
rios tipos de aparelhos de diversão que fun- 
cionam com um microprocessador. Dentre 
os mais conhecidos está o Genius (Simon, 
nos Estados Unidos), onde você é obrigado a 
repetir uma sequência de cores e sons dada 
pelo brinquedo, com muitas variações e ve- 
locidades, num estimulante exercício para 
os reflexos de visão e audição. Outro nes 
bastante popular é o Merlin, que utiliza te- 
clas, sons e cores para fazer seis diferentes 
jogos de reflexos e inteligência. Mais recen- 
temente, a Texas Instruments lançou no 
mercado americano e europeu (e até o fim 
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do ano promete lançar no Brasil) o Speak & 
Spell e o Touch & Tell, dois pequenos com- 
putadores munidos de sintetizadores de voz 
que ensinam a criança a soletrar e ler pala- 
vras e números. (Para os que viram o filme, 
um Speak & Spell foi utilizado pelo E. T. 
para a construção daquela engenhoca que 
recebia mensagens do espaço.) 

Os arcade games são na realidade micro- 
computadores com hardware e software de- 
senvolvidos especificamente para executar 
apenas um programa de jogo. Eles podem 
ser encontrados em qualquer casa de flipe- 
rama e são aqueles jogos que se desenvolvem 
numa tela de vídeo com o uso de controla- 
dores os mais diversos (joysticks, volantes, 
pedais, manches etc). O nome arcade deri- 
va da armação de madeira onde os jogos fi- 
cam instalados, que se assemelha a uma 
arcada. 

No Brasil, uma boa parcela dos mais co- 
nhecidos jogos americanos e japoneses já é 
conhecida dos aficcionados, como o Aste- 
roids, o Space Invaders, o Defender, o Qix, 
o Pack Man e muitos outros. Para se ter uma 
idéia da popularidade destes jogos, é muito 
comum nos Estados Unidos haver cam- 
peonatos de Asteroids ou de Space Invaders, 
cujos resultados figuram nas páginas despor- 
tivas dos jornais matutinos. 

Os jogos arcade são os melhores jogos de 
computação a que o grande público tem 
acesso, pois contam com um processador 
voltado exclusivamente para o jogo, monito- 
res de vídeo a cores de altíssima resolução 

áfica e modernas tecnologias (no monitor 

uadrascan, utilizado pelo Asteroids, conse- 
gue-se até o efeito de brilho em um ponto) e 
toda a memória necessária para rodar o pro- 
grama, normalmente feito em linguagens rá- 
pidas como o Forth ou o Assembler. 

Mais recentemente, surgiram arcade ga- 
mes de pulso ou de bolso, os watch games, 
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Os watch games da Dismac 








Brinquedos, arcades 
e videogames 





Os brinquedos eletrônicos da Texas 


acoplados a um relógio ou calculadora e 
com vídeo plano de quartzo. A Casio já 
tem relógios à venda com jogos e a Dismac 
começa a lançar calculadoras/relógios de 
bolso com joguinhos arcade. 


OS VIDEOGAMES 

Tão populares quanto os arcade no exte- 

rior, os videogames ainda são uma incrível 
novidade para a maioria dos brasileiros fora 
dos grandes centros. Um aparelho de video- 
game nada mais é do que um toca-programa, 
ou seja, um microcomputador não progra- 
mável por seu usuário mas que executa pro- 
gramas armazenados em cartuchos (invólu- 
cros de plástico contendo um chip de me- 
mória ROM com um programa gravado) 
compatíveis com seu sistema. Ele é ligado a 
uma TV comum (de preferência a cores) e 
precisa de joysticks para ser usado. Seus jo- 
gos são similares aos arcade, mas eles têm 
uma resolução gráfica bem mais grosseira e 
imitações impostas pelo hardware mais sim- 
ples. 
Para adquirir um videogame, o consumi- 
dor brasileiro pode escolher, a princípio, 
entre um importado e um nacional. Os im- 
portados (Atari, Intelivision etc) são acha- 
dos nos videoclubes, graças a falhas na legis- 
lação e na fiscalização aduaneira, que per- 
mitem seu fácil ingresso no país. 

Se a opção cair num videogame nacional, 
a escolha não será muito difícil. Existem 
apenas quatro modelos sendo comercializa- 
dos e mais dois sendo lançados. Já à venda 
estão o Dactari, da Milmar, o Dynavision, 
da Dynacom, o Top Game, da Bit Eletrôni- 
ca e o Odissey, da Philips. De todos, apenas 
este último não é similar aos modelos Atari. 
A Dismac está lançando o seu VJ-9000 ain- 
da este mês, enquanto a Gradiente/Polyvox 
lança nada mais nada menos que o Atari, 
que a tradicional indústria de som conse- 
guiu representar no Brasil. 

Para se ter uma idéia da rápida receptivi- 
dade que os videogames vêm tendo no Bra- 
sil, primeiro via contrabando e agora por fa- 
bricantes nacionais, basta ver alguns núme- 
ros destas indústrias: a Milmar informou à 
MICRO SISTEMAS que está produzindo 1 
mil e 500 Dactaris e S mil cartuchos por 
mês; a Gradiente /Polyvox espera colocar no 
mercado 130 mil Ataris até fevereiro de 84; 
e a Dismac tem previsões de vender 150 mil 


“VJ-9000 até o fim deste ano! 


Os videogames nacionais estão com pre- 
ços entre Cr$ 150 e 200-mil e um cartucho 
pode custar entre Cr$ 12 35 mil. 2 
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Agora, na hora de escolher entre um 
microcomputador pessoal simples, de fácil 
manejo e um sofisticado microcomputador 
profissional, você pode ficar com os dois 

Porque chegou o novo CP 300 Prológica. 

O novo CP 300 tem preço de 
microcomputador pequeno. Mas memória 
de microcomputador grande. 

Ele já nasceu com 64 
> kbytes de memória 


Z interna com 





possibilidade de Permite para o CP 500 ou o 


E 


Pode ser ligado ao seu"áparelho de TV, da 
mesma forma que no terminal de vídeo 

de uma grande empresa. 

Com o CP 300 você pode 

fazer conexões telefônicas 

h. para coleta de dados, 
w se utilizar 
de uma 

impressora 

e ainda dispor de todos 

Os programas existentes 


Compatível com 
programas em fita 
cassete ou em disco. 












Pode ser ligado 

a um televisor comum 
ou a um sofisticado 

terminal de vídeo. 


expansão de memó- rpmeio TRS-80 americano. E o que é melhor: 


Pode ser , ria externa para até 
acoplado a uma quase 1 megabyte. 
impressora. r 


E tem um teclado profissional, 
que dá ao CP 300 uma versatilidade incrível. 
Ele pode ser utilizado com programas de 
fita cassete, da mesma maneira que com 


programas em disco. HEEEM 


Oúnico na sua faixa que já 
64 kbytes de 





nasce com 





você estará apto a operar qualquer 
outro sistema de microcomputador. 
Nenhum outro microcomputador pessoal 
na sua faixa tem tantas possibilidades de 
expansão ou desempenho igual. 
CP 300 Prológica. 
Os outros não 


fazem o que ele faz, -A RSSATDENÇA. 
pelo preço que END 
ele cobra. EE 









AM 
Manaus - 234-1045 


* BA-Salvador 247-8951 

* CE-Fortaleza - 226-0871 - 244-2448 

« DF-Brasília - 226-1523 - 225-4534 « ES-Vila Velha 

229-1387 - Vitória - 222-5811 + GO-Goiânia - 224-7098 + MT 

Cuiabá - 321-2307 » MS-Campo Grande - 383-1270 - Dourados - 421-1052 

* MG-Belo Horizonte - 227-0881 - Betim - 531-3806 - Cel. Fabriciano - 841-3400 - Juiz 

de Fora - 212-9075 - Uberlândia - 235-1099 « PA-Belém - 228-0011 * PR-Cascavel - 23-1538 - Curi- 

tiba - 224-5616 - 224-3422 - Foz do Iguaçu - 73-3734 - Londrina - 23-0065 + PE-Recife - 221-0142 « Pi-Teresina 

222-0186 + RJ-Campos - 22-3714 - Rio de Janeiro - 264-5797 - 253-3395 - 252-2050 « RN-Natal - 222-3212 * RS-Caxias do 

Sul - 221-3516 - Pelotas - 22-9918 - Porto Alegre - 22-4800 - 24-0311 - Santa Rosa - 512-1399 + RO-Porto Velho - 221-2656 * SP 

Barretos - 22-6411 - Campinas - 2-4483 - Jundial - 434-0222 - Marília - 33-5099 - Mogi das Cruzes - 469-6640 - Piracicaba - 33-1470 - Ribeirão 

Preto - 625-5926 - 635-1195 - São Joaquim da Barra - 728-2472 - São José dos Campos - 22-7311 - 22-4740 - São José do Rio Preto - 32-2842 - Santos - 33-2230 
Sorocaba - 33-7794 + SC-Blumenau - 22-6277 - Chapecó - 22-0001 - Criciúma - 33-2604 - Florianópolis - 22-9622 - Joinvile - 33-7520 + SE-Aracajú - 224-1310 





Caracteristicas Técnicas 

. Einpuagem BASIC 

* 10 Kbytes de ROM 

* 16 0u 48 Kbytes de memória 
RAM. 


* 40 teclas e 160 funções. 

* Gravação de programas em 
fita cassete comum 

* Input e Output de dados. 

* Vídeo: aparelhos de TV B&P 
ou colorido. 

* Funções especiais 
HIGH-SPEED. 

* Som Opcional 

* Joystick, impressora 


Preço de lançamento: 
Cr$ 229.850,00 (16 K) 


Cr$ 329.850,00 (48 K) 
(Preço sujeito a alteração) 


REVENDEDORES: ARACAJU 224-1310 * BELEM 222-5122/226.0518 « BELO HORIZONTE 226-6336/225-3305/225-0644/201-7555 + BLUMENAU 22-1250 * BRASÍLIA 224-2777/225-4534/226-9201/ 
726-4327/242-6344/242-5159 * BRUSQUE 55-0675 « CAMPINAS 32-38 10/8-0822/32.4 155/2-9930 * CAMPO GRANDE 383-6487/382 5332 * CARUARU 721-1273º CUIABÁ 321-8119/321-7929 + CURITI- 
BA 232.1750/224-6467/224. Era As 32-1196 + DIVINOPOLIS 221-2942 + FLORIANÓPOLIS 23-1039 « FORTALEZA 226-4922/231.5249/231-0577/231-7013 « FREDERICO 


WESTPHALEN 344-1550 + GOIÂNIA 261.0333/224-0557 + LJUÍ 332-2740 + ITAJUBÁ 622-2088 + LINS 22-2428 + LONDRINA 22-4244/23-9674 + MACEIO 223-3979/221-6776 + MANAUS 237-1793 * MO- 
GIDAS CRUZES 468-3779/208-6797 « MURIARE 721-1593 « NATAL 222-3212/231-1055 + NITERÓI 722.6791 * NOVO HAMBURGO 93-1922/93-3800 * PELOTAS 24-5139 + PORTO ALEGRE 26-8246/ 
214189/24.1411/22-3151/24-0311/21-6109/24-7746 * PRESIDENTE PRUDENTE 22-2788 » RECIFE 241-4310/224-8777/224-3436/224-4327 « RESENDE 54-1664 + RIBEIRÃO PRETO 636-0586/634-4715/ 
8635-1195 RIO DE JANEIRO 267-1093/252-2050/253-3395/264-0143/259-1516/232-5948/591-3297/222-6088/267-1339/329-4869/228-2650/246-4824/239-56 12/542-3849/62.8727 + SALVADOR 248-6666/ 
235-4184/247:5717 * SANTA MARIA 221-7120 + PARTO ANDAS AO ARMAA TST aa * SANTOS 4-1220/32-7045/35-1792/33-2230 * SÃO CARLOS 71-9424 * SÃO JOÃO DA BOA VISTA 22-3335 
* SÃO JOSÉ DOS CAMPOS 22-3968/22-7311/22-8925/21-3135 O PAULO 853-0164/853-0448/239-4122/36-696 1/61-4049/881-1149/258-3954/212-9004/282-2105/212-3888/545-4769/227-3022] 
B64-8200/222-1511/259-2600/282-6609/813-4555/8 14-3663/826-1499/521-3779/270-7442/210-7681/813-4031 + SOROCABA 229988 * TAUBATÉ 31-4137 + UBERABA 333-1091 * UBERLÂNDIA 
234-8796 * VIÇOSA 891-1790/891-2258 + MARÍLIA 33-4109 





